bonjour,

j'essai de faire quelque code en vba pour ne plus pouvoire modifié la cellule apres un modif
mais elle fonctionne pas pourriez vous m'aider

[code]

Private Sub Worksheet_Change(ByVal Target As Range)
Dim cel As Range
Dim st As String
ActiveSheet.Unprotect Password:=st
For Each cel In Target
If Trim(cel) <> "" Then cel.Locked = True
Next cel
ActiveSheet.Protect Password:=st, DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub

ca bloc au niveau de unprotect password:=st

merci d'avance

desolé pour la polusion

j'avait oublier les "" dire que je ne touvais pas

merci et excusez moi

Reviens quand tu veux, avec des erreurs aussi bêtes (et nous nous moquerons gentiment de toi ) ou avec des problèmes plus sérieux et nous les règlerons ensemble