combobox ??

[Esox]

Bonjour le forum,

Voilà j'ai plusieurs boutons lancant différentes macros. Ces boutons commence à devenir envahissant, et je souhaiterai insérer un menu déroulant, avec l'équivalant des boutons dedans, pour ensuite choisir la macro à lancer. Ainsi, juste avec ce menu je pourrais avoir le choix entre plusieurs macros à lancer.
Auriez vous une piste ?
Merci
Stef

 

[Robert]

Re : combobox ??

Bonjour Esox, bonjour le forum,

En pièce jointe une proposition à àdapter à ton cas. Dans la colonne K la liste des macros contenues dans le module 1. Dans la cellule A1 une liste de validation reprenant la liste de la colonne K. Et une macro événementielle change dans l'onglet Feuil1 avec le code ci-dessous :

Private Sub Worksheet_Change(ByVal Target As Range
If Target.Address <> "$A$1" Then Exit Sub 'si le changement a lieu ailleurs qu'en A1, sort de la procédure
If Target.Value = "" Then Exit Sub 'si la cellule A1 est effacée, sort de la procédure
Application.Run ThisWorkbook.Name & "!" & Target.Value 'lance la macro correspondante au nom inscrit dans A1
End Sub

Tu choisis dans A1 et la macro s'exécute...

 

[Esox]

Re : combobox ??

Bonjour Robert, le forum,

Impecc, je l'adapte et reviens vers vous si problème. Sinon bon week end à tous.
encore merci
Stef