Variable dans le nom d'une listbox (sur une feuille excel)

[Adeus33]

Bonjour le forum,

Est-il possible d’utiliser une variable pour nommer une listbox contenue sur une feuille ?
J’ai essayé le code ci-dessous, mais il ne l’accepte pas (à priori, cela fonctionne uniquement sur un userform) :

NomListbox = Controls("listbox" & i)

Merci d’avance pour votre aide

Adeus

 

[Hervé]

Re : Variable dans le nom d'une listbox (sur une feuille excel)

salut

tu peux peut etre t'inspirer de ceci :

toto = ActiveSheet.OLEObjects("Listbox1").Name

a plus

 

[Hervé]

Re : Variable dans le nom d'une listbox (sur une feuille excel)

re

une boucle pour lister les controls :

Dim it As OLEObject
For Each it In ActiveSheet.OLEObjects
    MsgBox it.Name
Next it

un code pour alimenter une listbox :

x = 1
For i = 1 To 5
    With ActiveSheet.OLEObjects("Listbox" & x).Object
        .AddItem "lolo" & i
    End With
Next i

a plus

 

[Adeus33]

Re : Variable dans le nom d'une listbox (sur une feuille excel)

Bonjour et merci Hervé, cela fonctionne parfaitement.

Voici le code que j'utilise désormais :

ActiveSheet.OLEObjects("Listbox" & x).Object

Merci et bonne journée.