Hi KJBox
You assisted me yesterday with a code for my worksheet: I cant get the code to work so have taken it out and have attached the workbook for you to see if you can get it going! I've tried all sorts......heeeelp
log in on opening is -
Barrap
Password
Chuckles3
to unlock sheet - 12345
Code is Below
No, but this will also lock the approve cell
Code:
Private Sub Worksheet_Selection(ByVal Target As Range) If Target.Row < 12 Or Target.Count > 1 Then Exit Sub If Not Intersect(Target, .Columns(15)) Is Nothing Then If Target = "APPROVE" Then Target.Offset(, -9).Resize(, 2).Locked = 1 Target.Locked = 1 End If End If End Sub