XL 2016 Comment récupérer la valeur sélectionnée d'un ComboBox

[Dudu2]

Bonjour,
Je créé une ComboBox dynamiquement. Hors UserForm (ce qu'il faut certainement éviter).
J'arrive à capturer l'évènement de Click mais impossible de récupérer le ListIndex ou toute autre chose à part le nom de l'objet.

Merci pour toute proposition de syntaxe correct.
JP

 

[pierrejean]

Re
Comme ceci peut-etre

Sub ComboListe_Click()
MsgBox (ComboListe.Value)
'    Call ComboListeClic
End Sub

 

[Dudu2]

Merci pierrejean, ça fonctionne très bien je n'aurais jamais pensé à ça !
J'ai juste adapté pour passer ComboListe à la fonction du module:

Code dans la feuille contenant la ComboBox:

'-------------------------------------
'Évènement Clic sur l'objet ComboListe
'-------------------------------------
Sub ComboListe_Click()
    Call ComboListeClic(ComboListe)
End Sub

Code dans un module général:

'-----------------------------------
'Évènement capturé dans la feuille !
'-----------------------------------
Sub ComboListeClic(CB As Object)
    MsgBox CB.Value
End Sub