Lister les objets d'un USF

Salut le forum,

est-il possible avec du code de lister tous les objets (textbox, combobox, images) d'un userform? Cette liste s'affichant soit dans un msgbox, soit dans une feuille.

Merci pour votre aide.

Salut le forum

EricF, un bout de code pour t'amuser

Sub ListerControle()
Dim LeControle As Control
    For Each LeControle In UserForm1.Controls
        MsgBox LeControle.Name
    Next LeControle
End Sub

Mytå

Ahhhhhhhhhhhhhhhh!!!

J'y étais presque.

Mytå.

Re le forum

Eric, moi aussi j'étais pas loin.

Sub PasLoin()

Dim I As Byte

For I = -5 To 5

'Le traitement

Next I

'Pourquoi le débogage apparait

'Sans commentaire juste une joke

End Sub

Bonne fin de soirée à tous

Mytå