unlocking a row
Hi AJ
This one approach that might work for you, which uses worksheet event code.
In this example the user would be limited to only entering data one cell
below the last entry made in columns C through J.
The range can be altered to suit.
The cells themselves do not need to be protected.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim lr As Long
' this will limit entry in columns C through J
' Amend to suit
If Target.Column < 3 Then Exit Sub ' C
If Target.Column 10 Then Exit Sub 'J
lr = Cells(Rows.Count, Target.Column).End(xlUp).Row + 1
ScrollArea = Cells(lr, Target.Column)
Cells(lr, Target.Column).Activate
End Sub
Copy the Code above
Right click Sheet tab View Code
Paste code into white pane that appears
Alt+F11 to return to Excel
This is event code which will be triggered automatically.
--
Regards
Roger Govier
"AJ" wrote in message
...
Is it possible to lock a worksheet then only allow one row at a time to be
unlocked for editing? If so, how?
Thanks so much!
--
AJ
|