Masquer ligne avec VBA

Le problème reste le même, tous les détails des autres mois s'affichent aussi....
Est-ce possible aussi d'ajouter une option pour que, lorsque l'on clike à nouveau, les lignes se masquent à nouveau?

Merci mais il y a un petit problème. Lorsque je clike sur le bouton, tous les détails de toutes les années se déroulent aussi. Moi, je veux créer un petit bouton pour chaque année pour ne faire afficher que le détail de l'année que l'on veut. Auriez vous une solution? Merci

j'en ai une, mais il faut que je sache dans quelles colonnes se positionnent les années et combien de lignes il y a entre elles?

Les années s'étendent de la colonne à la colonne Z.
La première ligne avec des valeurs à l'année commence à la ligne 3. Donc les lignes cachées vont de la ligne 4 à 34 (30 jours). Et ainsi de suite...

ca varie en fonction des mois je suppose.
juste une dernière précision et ensuite ca sera bon, tu veux 12 boutons (1 par mois) ou un seul??

Oui biensur, certains mois ont 31 jours etc...
Ben je veux créer un bouton par mois (12 boutons), je pense qu'avec un modèle pour un mois je pourrais m'en sortir pour les autres! Merci beaucoup !

Bonjour,

Pour chaque bouton, tu fais comme je t'ai dit.
Clic droit et visualiser le code.
Entre les deux lignes, tu mets :
Rows("4:34").Select 'tu adaptes tes lignes en fonction de tes mois
Selection.EntireRow.Hidden = False

donc pour le premier bouton, ca donne :
Private Sub CommandButton1_Click()
Rows("4:34").Select 'tu adaptes tes lignes en fonction de tes mois
Selection.EntireRow.Hidden = False

End Sub

Non , tous les autres mois ne s'affichent pas!!!!
le code que je te donne n'agit que sur les lignes sélectionnées par cette ligne :
Rows("4:34").Select

si tes lignes sont cachées, elles n'affichent que celles prévues dans le code
si elles sont visibles, elles ne cachent que les lignes prévues dans le code.

ton premier mois sera et n'agit que sur les lignes 4 à 34!!! :
Private Sub CommandButton1_Click()
Rows("4:34").Select 'tu adaptes tes lignes en fonction de tes mois
If Selection.EntireRow.Hidden = False Then
Selection.EntireRow.Hidden = True
Else
Selection.EntireRow.Hidden = False
End If
End Sub

pour ton second n'agira que sur les lignes 36 à 64!!! :

Private Sub CommandButton2_Click()
Rows("36:64").Select 'tu adaptes tes lignes en fonction de tes mois
If Selection.EntireRow.Hidden = False Then
Selection.EntireRow.Hidden = True
Else
Selection.EntireRow.Hidden = False
End If
End Sub

Pour le troisième n'agira que sur 66 à 100!!!:

Private Sub CommandButton3_Click()
Rows("66:100").Select 'tu adaptes tes lignes en fonction de tes mois
If Selection.EntireRow.Hidden = False Then
Selection.EntireRow.Hidden = True
Else
Selection.EntireRow.Hidden = False
End If
End Sub

Pourtant, je fais tout exactement comme vous me dites avec le même code et les mêmes numéros de ligne et, quand j'appuie sur le premier bouton qui est sensé afficher les lignes de 4 à 34, ben tout s'affiche, y compris les lignes 36 à 66 etc...
A la limite, ne connaissez vous pas un autre moyen que vba pour pouvoir masquer et afficher des lignes sur excel avec une simple commande?

non, pouvez-vous mettre le code que vous avez mis pour au moins l'un des boutons. Si ca se trouve, y a un truc qui a pas.
Car j'ai esssayé sur excel et ca fonctionne très bien.