débloquer une cellule en vb

[guima1642]

bonjour,

Pb avec une boucle "impossible de définir la propriete locked de la classe range"

   For i = 21 To Rows.Count
        If Sheets("devis").Cells(i, 38) = "gb" Then Exit For

        If Sheets("devis").Cells(i, 38) <> "SP" Or Sheets("devis").Cells(i, 38) <> "ASP" Or Sheets("devis").Cells(i, 6) <> "" Then
        [COLOR="Red"]Sheets("devis").Cells(i, 9).Locked = False[/COLOR]
        end if
        next i

merci d'avance

 

[Pierrot93]

Re : débloquer une cellule en vb

Bonjour,

ta feuille est sans doute protégée, si c'est le cas il y a lieu de la déprotéger au préalable, ou la protéger par vba en utilisant l'argument "UserInterfaceOnly" ...

bon après midi.
@+

 

[guima1642]

Re : débloquer une cellule en vb

merci beaucoup