Bouton Imprimer pour imprimer plusieurs zones d'une feuille.

[alexandre33260]

Bonjour, j'ai la macro suivante :

Sub BoutonImpr()
Sheets("Feuil1").Range("A13:J20").PrintOut
End Sub

Cela me permet d'imprimer A13 a J20. mais je voudrais imprimer A13 a J20 et aussi A37 a J84 sur la même feuille.
Merci pour votre aide.

 

[DoubleZero]

Re : Bouton Imprimer pour imprimer plusieurs zones d'une feuille.

Bonjour, alexandre33260, le Forum,

Peut-être ainsi :

Option Explicit
Sub Imprimer()
Rows("21:36").EntireRow.Hidden = True
Range("A13:J84").PrintPreview
Rows("21:36").EntireRow.Hidden = False
End Sub

A bientôt 🙂