Rendre visible label et image sur Userform

Bonjour

J'ai 20 contrôles image et 20 labels sur un userform avec la propriété visible à "False" j'aimerais avec ma combobox faire une boucle pour les rendre visible sans mettre:

Image1.Visible = True
Label1.Visible = True
Image2.Visible = True
Label2.Visible = True ect...

Je vous remercie d'avance

Cordialement

Max

Bonsoir,

Petite routine qui scrute tous les contrôles du userforme et dès que c'est égal un un objet de nom Label alors on fait des trucs :

i = 1
For Each ob In UserForm1.Controls
    If ob.Name = "Label" & i Then
            ob.Visible = True
            i = i + 1
    End If
Next ob

par contre il faut de la rigueur dans la créations des labels ! en effet dans cette boucle pas de "trous" possibles !!!

Donc les Labels que vous allez vouloir gérer comme ceci, devront avoir une numérotation progressive et continue, après ils peuvent commencer à 123, il suffit de mettre "i" à 123 avant la boucle.

Une chose est souple c'est le nom, un objet Label aura toujours comme nom pour VBA Label + un chiffre, même si vous décidez de changer le nom !!!

donc le test If ob.Name = "Label" & i Then sera vrai où i correspond à un Label existant...

Pour les objets images c'est la même chose...

@ bientôt

LouReeD

Rechercher des sujets similaires à "rendre visible label image userform"