Connaître le nombre de ComboBox qu'il y a dans une feuille

[Magic_Doctor]

Bonsoir ou plutôt bonjour,

Supposons que j'aie dans une feuille 15 ComboBox.
Par quel moyen puis-je connaître ce nombre ?

Merci pour m'aider à le connaître.

 

[BOISGONTIER]

Re : Connaître le nombre de ComboBox qu'il y a dans une feuille

Bonjour,

For Each c In ActiveSheet.OLEObjects
If TypeName(c.Object) = "ComboBox" Then n = n + 1
Next c
MsgBox n

JB

 

[Magic_Doctor]

Re : Connaître le nombre de ComboBox qu'il y a dans une feuille

Merci BOISGONTIER.