The following code in a spreadsheet that is used by production staff to enter testing results. I would like to reformat the data entry fields into a table that will automatically expand when the user needs a new line. Currently they have to find someone with the password, who unlocks the spreadsheet and adds more lines (and they don't always do it correctly so the formatting gets messed up). The code works as is, locking the cells as data is entered, but it won't allow me to use a 'tab' in the last cell of the current table in order to add a new line.
I will attempt to attach a small Excel sheet, hopefully it works for me this time!
Thank you for the assistance,
DixieLou
Here is the current code:
# Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range
ActiveSheet.Unprotect Password:="TEST"
For Each c In Target
c.MergeArea.Locked = (c.Value <> "")
Next c
ActiveSheet.Protect Password:="TEST"
End Sub #
Bookmarks