Bonjour,

J'ai un formulaire qui contient 10 labels nommés de "Label100" à "Label109"

J'aimerais les rendre visible en fonction de la valeur d'une cellule qui leur est propre.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
Dim maCell As Range, i As Byte, monLabel As Object
 
 i = 0
 
 For Each maCell In Worksheets("Feuil2").Range("G2:G11")
        monLabel = "Label10" & i
        If maCell.Value = "todo" Then monLabel.Visible = True
        i = i + 1
 Next
Je comprends que ça cloche à la ligne 7 mais je ne sais pas quelle syntaxe utiliser pour corriger ça, auriez-vous une piste?