bonjour stellaCG
un bonjour serai mieux vu pour répondre
j'ai ce code dans un module qui masque des lignes
Private Sub MasqueLignesEnteteVide(masque As Boolean)
Application.ScreenUpdating = False
With Worksheets(WS_FACTURE)
.Rows(2).Hidden = masque
.Range("13:15").EntireRow.Hidden = masque
End With
Application.ScreenUpdating = True
End Sub
et dans l'aperçu au début du code il y a
MasqueLignesEnteteVide False
et en fin de code il y a
MasqueLignesEnteteVide True
ce code est la pour ne pas avoir de lignes vides entre les lignes d'entêtes lors de l'impression
peut etre peux tu l'adapter
edit bonjour yvouille
Pascal