Voila j'ai fait une petite macro qui imprime:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Sub impression() 
Sheets("Feuil1" ).Select 
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True 
End Sub
Maintenant ce que je souhaite c'est faire un bouton d'impression qui réalise la même tâche que ma macro
donc je crée sur ma feuille un bouton à l'aide des useform
et une fois mon bouton crée je click dessus pour réecrire le code, donc j'obtiens :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Private Sub CommandButton1_Click() 
Sheets("Feuil1" ).Select 
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True 
End Sub
maintenant j'essaie de clicker sur le bouton mais il est "inactif", je ne peux que modifier sa taille ou son texte.

Merci , ENCORE UNE FOIS, pour votre aide

LeSqual