OVH Cloud OVH Cloud

Drop Down menu

4 réponses
Avatar
JC
Je veux cr=E9er un dropdown menu dans excel et j'aimerais=20
savoir comment je dois faire. J'ai essay=E9 d'ins=E9rer une=20
zone de liste modifiable que j'ai pris dans la barre=20
d'outils "boite =E0 outils contr=F4le". Comment dois-je=20
proc=E9der?

4 réponses

Avatar
Hervé
Salut JC,
Il faudrait un peu plus de précision, Où prends tu tes valeurs pour remplir
ton Combo ? sur quel évennement veux tu déclancher une action ?
Hervé.
"JC" a écrit dans le message news:
002c01c340be$6bfb2190$
Je veux créer un dropdown menu dans excel et j'aimerais
savoir comment je dois faire. J'ai essayé d'insérer une
zone de liste modifiable que j'ai pris dans la barre
d'outils "boite à outils contrôle". Comment dois-je
procéder?
Avatar
AV
Un exemple de ComboBox ajoutée au menu de Feuille de Calcul à l'ouverture du
fichier et détruite à la fermeture
(Le nom du module ("Module1") contenant les macros affectées à la liste est à
adapter)

** Dans le module de ThisWorkbook :

Private Sub Workbook_Open()
With Application.CommandBars(1).Controls
With .Add(msoControlComboBox, Before:=.Count)
For Each élémT In Array("Fifi", "Riri", "Loulou")
.AddItem élémT
Next
.OnAction = "Module1.Combo_Change"
.Caption = "MenuCombo"
.ListIndex = 1
End With
End With
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars(1).Controls("MenuCombo").Delete
End Sub

** Dans le module Module1 :

Sub Combo_Change()
Application.Run Application.CommandBars(1).Controls("MenuCombo").Text
End Sub

Sub fifi()
MsgBox "fifi a été choisi"
End Sub

Sub riri()
MsgBox "riri a été choisi"
End Sub

Sub loulou()
MsgBox "loulou a été choisi"
End Sub

AV

"JC" a écrit dans le message news:
002c01c340be$6bfb2190$
Je veux créer un dropdown menu dans excel et j'aimerais
savoir comment je dois faire. J'ai essayé d'insérer une
zone de liste modifiable que j'ai pris dans la barre
d'outils "boite à outils contrôle". Comment dois-je
procéder?
Avatar
AV
jps (qui crée le stimuli chez AV comme on crée la secousse électrique
chez les dendrobates québécoises)


Hé ! Ho !
Je voudrais simplement te rappeler que le "réflexe de Sherrington" se fait sur
des grenouilles décérébrées !!
Alors laisse mes neurones en l'état SVP !

AV

Avatar
sabatier
:-)))))))))
au fait, ce sherrington, il est remplaçant au Manchester United ou à
Arsenal?
jps

AV a écrit:
jps (qui crée le stimuli chez AV comme on crée la secousse électrique
chez les dendrobates québécoises)



Hé ! Ho !
Je voudrais simplement te rappeler que le "réflexe de Sherrington" se fait sur
des grenouilles décérébrées !!
Alors laisse mes neurones en l'état SVP !

AV