Module de classe Boutons Userform

[cathodique]

Bonsoir🙂,

J'ai créé un formulaire de navigation sur lequel, il y a une vingtaine de boutons.
Je voudrais récupérer le nom du bouton activé dans une variable publique à utiliser
dans différentes procédures.
Vu le nombre de boutons, je sais qu'il faut faire appel aux modules de classe.
Merci de m'aider à en créer celui-ci.

En gros, quand je clique sur un bouton la variable prend le name du bouton (Var=userform1.bouton.name).

Avec mes remerciements.🙂

edit: oublié le fichier ICI

 

[mapomme]

Bonsoir @cathodique,

• on crée le module de classe class_bouton avec la déclaration de Bouton (dérivé de CommandButton) et on définit ce qui doit se passer quand on clique sur Bouton via la procédure Private Sub Bouton_Click().
• la procédure Private Sub Bouton_Click() stocke le nom de Bouton dans la variable Origine qui est déclarée dans Module0
• on déclare en tête du module de code de Usf_Navigation, un tableau de type class_bouton appelé tabloBouton
• on va placer dans tabloBouton tous les contrôles de type CommandButton qui doivent déclencher Private Sub Bouton_Click()

Une étiquette jaune a été rajoutée sur le formulaire. Cliquer sur cette étiquette affiche le nom du dernier bouton qui a été cliqué (qui se trouve dans la variable Origine)

 

[cathodique]

Bonjour @mapomme 🙂

Très gentil de ta part toutes ces explications, ça parait simple mais j'avoue que je ne savais pas comment y faire.

J'espère que pour le reste j'arriverai à mes fins.

Encore merci.

Bonne journée.

 

[ChTi160]

Bonjour Cat
Bonjour le Fil ,le Forum
Question tu as combien de Userform Différents a utiliser via tes Boutons(~20)?
tu dis :

Du formulaire Usf_Navigation, j'appelle un autre formulaire pour autoriser une ou des actions.

Peux tu expliquer la démarche par des exemples.
Merci!
Bonne journée
jean marie

 

[ChTi160]

Re
n'ayant pas encore compris le pourquoi du comment
je te joins un fichier exemple de ce que j'ai compris(j'utilise un Multipage)
dans l'attente de savoir le Pourquoi du comment Lol
un fichier
jean marie

 

[cathodique]

Bonjour Le Retraité Chanceux🙂,

Ce n'est pas mon cas (problèmes de santé en cette fin d'année).
Merci beaucoup pour ton retour. Tu as des longueurs d'avance sur moi.
J'étais entrain de répondre à ton post#4.
Tu trouveras des explications en feuille2.
Merci de t’intéresser à mon problème.

 

[cathodique]

Re
n'ayant pas encore compris le pourquoi du comment
je te joins un fichier exemple de ce que j'ai compris(j'utilise un Multipage)
dans l'attente de savoir le Pourquoi du comment Lol
un fichier
jean marie

à l'exception des feuilles et manipulations permises à tous les utilisateurs.
D'autres sont réservées qu'à certains utilisateurs à qui on communique le pass.
Est-ce plus clair maintenant?

Intéressante ton idée avec multipage, mais je préfère utiliser un userform simple.
Merci, je vais mettre ton fichier dans ma boîte à idées à exploiter.

 

[ChTi160]

Re
non ？
Ok！
Bonne fin de journee
jean marie