Création macro pour grouper/dégrouper

Bonjour à tous,

Voilà mon problème : sur mon fichier, j'ai groupé des colonnes afin de cacher certaines cellules car il y en aura au final énormément. Il y a plusieurs groupes. Je souhaiterai créer des boutons sur chaque groupe (avec les ronds orange fléchés dans mon extrait de fichier ci-joint) afin d'éviter d'appuyer sur les "+". Grâce à une macro, j'aimerai qu'un bouton déploie son volet (là où il est placé), je ne veux pas qu'il dégroupe tous les volets d'un coup.

Je n'ai pas trouvé de solutions à mon problème sur ce forum ou ailleurs, et étant encore débutant en VBA, je n'y arrive pas seul.

Si vous pouviez m'indiquer SVP les marches à suivre voire le code VBA qui se lancerait lorsqu'on clique sur un bouton.

Je vous en remercie d'avance.

Cordialement,

Bpste

755indicateurs.xlsx (52.36 Ko)

Bonjour

Ci-dessous 3 codes. Chaque à attribuer à un de tes boutons

Sub groupe1()
With Columns("D:AP")
If Not .Hidden Then .Hidden = True Else .Hidden = False
End With
End Sub
Sub groupe2()
With Columns("AR:CD")
If Not .Hidden Then .Hidden = True Else .Hidden = False
End With
End Sub
Sub groupe3()
With Columns("CF:DR")
If Not .Hidden Then .Hidden = True Else .Hidden = False
End With
End Sub

Clique droite sur chaque bouton pour choisir l'option "Affecter à une macro"

Si ok,clique sur V vert à coté du bouton EDITER lors de ta réponse pour cloturer le fil

Amicalement

Ça marche parfaitement, merci ! (cela parait si simple ...)

Rechercher des sujets similaires à "creation macro grouper degrouper"