Microsoft 365 Macro masquer/Afficher des lignes avec un bouton

G

gbinforme

XLDnaute Impliqué

• 18 Février 2024

• #2

Bonjour
Voici une macro qui effectue ton souhait :

VB:

Public Sub Voir_cacher()
Const pre_def = "1:7" ' lignes concernées
    With ThisWorkbook.ActiveSheet.Range(pre_def).Rows
        If .Hidden = False Then
             .Hidden = True
        Else
            .Hidden = False
        End If
    End With
End Sub

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 18 Février 2024

• #3

Bonjour

Une variante en onliner (pour les IfElseIfEndfophobes 😉 )

Code:

Sub hide_unhide()
ActiveSheet.Range("1:7").Rows.Hidden = Not ActiveSheet.Range("1:7").Rows.Hidden
End Sub

PS: et aussi pour meubler mon après-midi pluvieux 😉

 

Vote positif 0 Vote négatif

R

rikano94

XLDnaute Nouveau

• 18 Février 2024

• #4

Oui c'est ça c'est super merci.
Mais je n'ai pas de bouton sur la feuille ?

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 18 Février 2024

• #5

Re

Et la version light

Code:

Sub hide_unhide()
Rows("1:7").Hidden = Not Rows("1:7").Hidden
End Sub

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 18 Février 2024

• #6

Re

@rikano94
Il suffit d'ajouter un bouton et d'y affecter la macro de ton choix

 

Vote positif 0 Vote négatif

R

rikano94

XLDnaute Nouveau

• 18 Février 2024

• #7

Effectivement avec un petit tuto c'était facile à trouver merci.
Par contre j'ai vu des boutons que l'on pouvait modifier au niveau visuel (ombre, relief...).
Tout ce qu'il y a dans onglet format de forme est grisé.

 

Vote positif 0 Vote négatif

G

gbinforme

XLDnaute Impliqué

• 18 Février 2024

• #8

rikano94 à dit:

Mais je n'ai pas de bouton sur la feuille ?

Cliquez pour agrandir...

re
Nous n'avions pas de feuille 😛
Pour les boutons il faut utiliser les paramètres pour les décorer !

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 18 Février 2024

• #9

Re

@rikano94
Il y a bouton et bouton
Soit un bouton issu de la barre Outils Formulaire
Soit un CommandButton (ActiveX)
Soit une forme automatique (Shape) en guise de bouton

La aussi, moult tutos sur le web 😉

 

Vote positif 0 Vote négatif