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