cs_Pimouss3
Messages postés20Date d'inscriptionlundi 4 juin 2007StatutMembreDernière intervention15 septembre 2007
-
8 juin 2007 à 11:02
JM247L
Messages postés443Date d'inscriptionmardi 27 mars 2007StatutMembreDernière intervention 1 mars 2011
-
8 juin 2007 à 14:09
Bonjour,
Alors voilà j'utilise la commande à partir d'un bouton :
Private Sub CommandButton1_Click()
ActiveSheet.PrintOut
End Sub
pour imprimer une feuille de mon classeur excel, cependant j'aimerais intégrer dans celui ci les différentes pages que je veux imprimer. C'est-à-dire qu'elle me permette d'imprimer plusieurs pages de mon classeur.
Merci de votre réponse !
JM247L
Messages postés443Date d'inscriptionmardi 27 mars 2007StatutMembreDernière intervention 1 mars 20112 8 juin 2007 à 12:19
Bonjour,
Pour imprimer tout le classeur un bouton associé au code :
ActiveWorkbook.PrintOut Copies:=1, Collate:=True
Tu peux aussi faire une boucle avec comme limite Worksheets.Count mais bon C aussi un métier pour fainéant
Pour n'imprimer que certaines feuilles, tu les sélectionnes avant de cliquer un bouton associé au code :
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Bonne journée. JML
Satanas09
Messages postés18Date d'inscriptionsamedi 2 juin 2007StatutMembreDernière intervention22 août 2008 8 juin 2007 à 14:00
ou bien :
Sub ImprimeFeuille1()
ThisWorkbook.Sheets("Feuil1").PrintOut
End Sub
Sub ImprimeFeuille1a3()
ThisWorkbook.Sheets(Array("Feuil1", "Feuil2", "Feuil3")).PrintOut
End Sub
Satanas09 ..... Sapristi, saprista, souris grise et face de rat
Vous n’avez pas trouvé la réponse que vous recherchez ?