VBA - code - impression - debogage
Bonjour à tous,
Sur un classeur, contenant plusieurs onglets, j'ai défini un bouton pour une impression en direct de tous les onglets codés.
Seulement dans mes codes je prévois un nombre d'onglet, qui n'est pas toujours équivalent à ceux dans mon classeur. (ex : 20 onglets codés, 10 présents dans mon classeur au moment de l'impression). -> Ce qui fait qu'il y a un bug lors de l'impression.
Voici mes codes actuels :
Sub Impression()
Sheets("Page_de_garde").PrintOut , 1
Sheets("Etude_de_cas_1").PrintOut , 1
Sheets("Etude_de_cas_2").PrintOut , 1
Sheets("Etude_de_cas_3").PrintOut , 1
Sheets("Etude_de_cas_4").PrintOut , 1
Sheets("Etude_de_cas_5").PrintOut , 1
Sheets("Etude_de_cas_6").PrintOut , 1
Sheets("Etude_de_cas_7").PrintOut , 1
Sheets("Etude_de_cas_8").PrintOut , 1
Sheets("Etude_de_cas_9").PrintOut , 1
Sheets("Etude_de_cas_10").PrintOut , 1
Sheets("Etude_de_cas_11").PrintOut , 1
Sheets("Etude_de_cas_12").PrintOut , 1
Sheets("Etude_de_cas_13").PrintOut , 1
Sheets("Etude_de_cas_14").PrintOut , 1
Sheets("Etude_de_cas_15").PrintOut , 1
Sheets("Etude_de_cas_16").PrintOut , 1
Sheets("Etude_de_cas_17").PrintOut , 1
Sheets("Etude_de_cas_18").PrintOut , 1
Sheets("Etude_de_cas_19").PrintOut , 1
Sheets("Etude_de_cas_20").PrintOut , 1
End Sub
Je souhaiterai :
Si par exemple il y a que 2 "Etude de cas" cela ne bug pas. Dois je placer un code entre les lignes de codes ?
Merci de vos conseils !
Bonjour,
Sub Impression()
On error resume next 'devrait faire l'affaire...
Sheets("Page_de_garde").PrintOut , 1
'la suite sans changementA+
Ecoute cela fonctionne ! Merci bien !!!