Un bouton pour affichée tous mes labels cacher sous condition

[SSI83000]

Bonjour à tous

je cherche une solution pour affichée tous mes labels caché dont le nom commence par DM exemple DM_1_1_2 quelqu'un aurait il la gentillesse de m'aider svp merci

cordialement

 

[GeoTrouvePas]

Re : Un bouton pour affichée tous mes labels cacher sous condition

Bonjour,

Pour cela, il te faut créer une boucle sur tous les contrôles de ton userform et provoquer l'afficher selon tes conditions. Tu peux procéder comme ceci :

Sub BoucleLabel()

    Dim Ctrl As Control

    For Each Ctrl In Userform1.Controls
        If TypeName(Ctrl) = "Label" and Left(Ctrl.name,2) = "DM" Then
            Ctrl.visible = True
        End if
    Next

End Sub

 

[SSI83000]

Re : Un bouton pour affichée tous mes labels cacher sous condition

bonjour geotrouvent pas merci pour ton aide je teste cela et je te tien au courant
à bientot

 

[SSI83000]

Re : Un bouton pour affichée tous mes labels cacher sous condition

Re bonjour à tous la solution de geotrouvetous ma super bien aider désolé pour ce retard probléme d'informatique

encore un grand merci

 

[GeoTrouvePas]

Re : Un bouton pour affichée tous mes labels cacher sous condition

Pas de soucis.
Bonne journée