Sheet Protection

[QCDARLENE]

I need to protect the data already entered but allow entry of new data. Then once the new data has been saved, it too will be protected.

 

[lenze]

This can be done using a CHnage Event. What Columns or cells do you enter data into?? Are you entering data across rows?? Is the sheet password protected??
lenze

 

[QCDARLENE]

I am using 12 columns of data (A thru L), entering data per row and the sheet is not password protected just protected.

 

[lenze]

OK: Select Columns A:L and then unlock all cells via cells format. Now select all cells in A:L with current data and lock them. Now place this code in the sheet module

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Column > 12 Then Exit Sub
Me.Unprotect
Target.Locked = True
Me.Protect
End Sub

When data is entered, the cell will automatically be locked.

lenze

 

[QCDARLENE]

Sorry, what is a sheet module and how do I access it?

 

[lenze]

Right click the sheet tab and choose "View Code". This will open the sheet module. You an close it using ALT +Q!!

lenze

 

[QCDARLENE]

Thank you for your help, that did the trick.