Protect excel sheet but allow data entry with form

Question

I have an Excel form where users may enter data, but I do not want them to be able to modify the data after it has been entered. They should just be able to add data to the form, that's all. The problem is that I won't be able to add data using the form if I secure my sheet.

I can lock the remaining rows and unlock the first row, allowing me to add data. However, that only solves 90% of my issue.

I tried this code in ThisWorkbook :

Private Sub Workbook_Open()
    Me.Worksheets("Sheet1").Protect UserInterfaceOnly:=True
End Sub

Then I locked my sheet and it's still giving me error 1004. Can someone please help me with this?

Answer 1

Try this:

Private Sub Workbook_Open()
    Me.Worksheets("Sheet1").Protect UserInterfaceOnly:=True
End Sub

And then lock your sheet like you normally would.