السلام عليكم
عندي كود بيعمل locked للحلايا بشرط
المشكله ان الكود بيبتدي عمله من الخليه a1
انا عاوز اعدل عليه بحيث انه يبدي عمله من الصف التاسع , ويتجاهل ما قبل ذلك
الكود
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Unprotect Password:=""
If Range("a" & Target.Row & ":a" & Target.Row).Value = 1 Then
Range("b" & Target.Row & ":b" & Target.Row).EntireColumn.Locked = True
Else
Range("b" & Target.Row & ":b" & Target.Row).EntireColumn.Locked = False
End If
ActiveSheet.Protect Password:="", DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub