Afiche ou cache des lignes

bonjour

je veux un code court qui affiche et cache les ligne

merci de votre aide

Bonjour

Tu voudrais cacher quelles lignes?

A te lire

Cordialement

PARDON LES LIGNE IMPAIRE

EN COLEUR VERT

MERCI

je veux cacher les ligne impaire =2i+1

du 7 ou 59

merci

Bonsoir

Private Sub Affiche_Click()
Application.ScreenUpdating = False
For i = 7 To 59 Step 2
Rows(i).Hidden = False
Next i
End Sub

Private Sub Hidden_Click()
Application.ScreenUpdating = False
For i = 7 To 59 Step 2
Rows(i).Hidden = True
Next i
End Sub

Amicalement

Nad

cordialement

ca marche tres bien