[Bouton On / Off] 1 bouton = 2 macros

[Elmios]

Bonjour je souhaiterai avoir un bouton on / off.

J'ai actuellement une macro sur bouton qui me permet de masquer 2 colonnes et une autre sur un autre bouton qui réaffiche ces 2 colonnes.

L'objectif serait d'avoir un bouton qui fasse cela : qui passe d'un état "Afficher" à "Masquer".

On doit pouvoir le faire via le code mais c est pas trop mon domaine je débute a peine en VBA.

Sinon avec une case à cocher selon si elle est cochée ou non !


Bref je rame pour trouver la solution !

 

[tototiti2008]

Re : [Bouton On / Off] 1 bouton = 2 macros

Bonjour Elmios,

ton bouton est un bouton de la barre d'outils Formulaire ou de la Boite à outils Contrôles ?

 

[SergiO]

Re : [Bouton On / Off] 1 bouton = 2 macros

Bonjour Elmios,

Ci-joint une solution.

@+

 

[Cousinhub]

Re : [Bouton On / Off] 1 bouton = 2 macros

Bonjour, Elmios

avec un ToggleButon (bouton à double effet)

le code :

Private Sub ToggleButton1_Click()
Columns("C:D").EntireColumn.Hidden = Me.ToggleButton1.Value
Me.ToggleButton1.Caption = IIf(Me.ToggleButton1, "Afficher", "Masquer")
Me.ToggleButton1.BackColor = IIf(Me.ToggleButton1, vbGreen, vbRed)
End Sub

un petit fichier exemple :


Edit, oups, ai pas trop raffraichi, sur ce coup
Salut Sergio et tototiti

 

[Elmios]

Re : [Bouton On / Off] 1 bouton = 2 macros

Merci beaucoup pour toutes ces réponses, je teste tout ca et vous tient au courant !

 

[Feutrine]

Re : [Bouton On / Off] 1 bouton = 2 macros

Bonjour à tous,

Si les colonnes sont contigües, on peut utiliser dans DONNEES ==> GROUPER ET CREER UN PLAN ==> Grouper

Ensuite, clic sur + ou -

Amicalement
Feutrine

 

[Elmios]

Re : [Bouton On / Off] 1 bouton = 2 macros

super merci pour toutes ces réponses !

Pour ton bonton bhbh comment est-ce que je peux le modifier en taille ? je n'arrive pas à l'éditer. il ne fait que du on/off

 

[Cousinhub]

Re : [Bouton On / Off] 1 bouton = 2 macros

Re-,

ce bouton est issu de la barre d'outils "Contrôle"

Sous 2003, et avant :

Affichage/Barre d'outils, et sélectionne "Boîte à outils Contrôles"

Dans cette barre d'outils, tu as à l'extrème gauche un bouton qui ressemble à une équerre, et qui te permet de passer en mode "Création"

Appuie dessus, tu peux modifier ton bouton, et n'oublie pas de re-appuyer dessus, pour quitter le mode "Création"

Avec un clic droit, tu peux également voir ses propriétés, et les modifier au besoin, notemment la police (Font)

 

[Elmios]

Re : [Bouton On / Off] 1 bouton = 2 macros

Super merci pour tout !!

Je m'attendais vraiment pas a avoir une réponse aussi rapidement

Je m'en retourne a mon fichier excel !