Bonjour
marfipo a écrit :
je veux faire la même condition pour les deux colonnes D & E
Explique un peu mieux
Si tu veux protéger la colonne E il suffit de rajouter la colonne E
NbLg = Range("D" & Rows.Count).End(xlUp).Row
Cells.Locked = False
Range("D10:E" & NbLg).Locked = True
Mais si tu ne veux protéger que les cellules non vides dans la colonne E
NbLg = Range("D" & Rows.Count).End(xlUp).Row
Cells.Locked = False
Range("D10:D" & NbLg).Locked = True
For I = 10 To NbLg
If Range("E" & I) <> "" Then
Range("E" & I).Locked = True
End If
Next I
ActiveSheet.Protect Password:=""
Comme d'habitude à toi de choisir