Exécuter macro sous condition commandbutton

Bonjour,

Ce que j'aimerais faire c'est:

j'ai deux module

Dans mon userform, j'ai 20 commandbutton

j'aimerais essayer de faire une condition sur mes commandbutton.

qui serais:

Mes 15 premiers commandbutton, quand je clic dessus. Ma macro 1 s'exécute

Mes 5 derniers commandbutton, quand je clic dessus. Ma macro 2 s'exécute.

Je vous remercie pour toutes information à mon problème

Bonjour,

une manière simple et paramétrée de faire est d'inclure un n° dans le texte du bouton et d'exploiter ce texte pour lancer la macro correspondante en captant ce texte dans

ActiveSheet.Shapes(Application.Caller).TextFrame.Characters.Text

ceci pour un bouton dans une feuille

c'est plus simple avec un userform en utilisant caption

Joins un fichier exemple à ta demande.

Bonjour Steelson,

Tous d'abord je tiens à vous remercier du temps que vous me consacré à mon soucis.

Cependant, je crois que je me suis super mal exprimé.

Comme vous pourrez le voir, j'ai un userform avec 20 commandbutton.

Les 15 premiers représente des nom de la première colonne de ma bdd

les 5 derniers représente les famille de la deuxième colonne de ma bdd

les 15 premier on le même code: TextBox1.Value = CommandButton1.Caption

les 5 derniers on le même code: Sheets("Famille3").Select Range("A1").Select

Ce que j'aimerais c'est trouver un code pour remplacer:

1) TextBox1.Value = CommandButton1.Caption (J'aimerais remplacer Commandbutton.Caption par le titre du bouton)

2) Sheets("Famille3").Select Range("A1").Select (J'aimerais remplacer Famille3 par le titre du bouton)

J'espère mettre mieux expliqué

En vous remerciant d'avance

Re,

J'ai oublié de mettre la pièce joins

Merci

Qu'est-ce que tu appelles titre du bouton ?

Dans les propriétés il n'y a pas de titre, mais le nom

TextBox1.Value = CommandButton1.Name

Re,

Quand je dis le titre, ça serais la caption du button

Merci

Bonjour xFlox, Steelson, le forum,

Un essai avec un module de classe (que je ne maitrise pas encore, j'ai galéré )...les pros me corrigeront...

Cordialement,

Bonjour,

Désolé pour la réponse tardive, trop de travail.

Je te remercie pour ton temps, c'est exactement ce que je cherche.

Un grand merci

Re,

Je sais pas si je vois crois mais est-ce possible de copier le module dans un commandbutton.

Je m'explique, comme tu peux voir, il y 70 commandbutton qui correspond à la colonne produits et j'ai 7 commandbutton qui correspond à la colonne famille.

J'aimerais si je change la disposition de mon usurform, par exemple 63 pour produit et 14 pour famille

avec le code que j'ai, la présentation de mon usurform changera sans soucis, cependant le code macro ne changera pas.

Est-possible de le changer automatiquement sans le changer manuellement.

En te remerciant.