Utilisation d'un nom de variable objet dans une boucle for

Bonjour,

sur un userform je possède une cinquantaine d'objets que je voudrais rendre invisible. Plutôt que d'utiliser 50 lignes de codes pour le faire :

Image1.Visible = False

Image2.Visible = False

Image3.Visible = False

Je voudrais passer le nom de l'objet en variable pour l'utiliser dans une boucle for affin d'obtenir quelque chose dans ce style:

For i = 1 To 48

imagei = "Image" & i

UserForm1.imagei.Visible = False

Next i

Malheureusement je ne trouve pas la syntaxe.

Par avance Merci de votre aide

Bonjour et bienvenu

A tester ( code à placer dans le module de l'userform)

Private Sub UserForm_Initialize()
Dim I As Integer
  For I = 1 To 48
    Me.Controls("Image" & I).Visible = False
  Next I
End Sub
Rechercher des sujets similaires à "utilisation nom variable objet boucle"