impression de plusieurs feuilles

[Olivier]

Rebonjour à vous,

encore un petit problème:
j'ai une macro qui m'imprime la feuille active et donc un bouton de commande sur chaque feuille. Jusqu'à là tout va bien. Mais j'aimerais pouvoir imprimer toutes ces feuilles d'un seul clic sur la première feuille.
Mes Feuilles à imprimer s'appellent Gr1, Gr2, Gr3, ..., Gr16.
Il me faudrait, je pense, un truc du style:

for I=1 to 16
imprime la feuille "Gr" + I
next I

mais j'arrive pas à le faire...:-(

merci
Olivier

 

[Pascal76]

Re Olivier

essaies un code du genre :

Application.screenUpdating=false
for each ws in worksheet
MaFeuille=ws.name
Sheets(MaFeuille).Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
next
Application.screenUpdating=true

Bon courage

Pascal

 

[Olivier]

merci bien à toi, Pascal, m'en vais essayer ça toute suite...