Hi:
The following does not stop the alert message box if
an attempt is made to enter data into a protected cell.
Any advice as to how to stop the alerts would be greatly
appreciated.
Private Sub Worksheet_Activate()
Worksheets("Sheet1").Unprotect
Application.DisplayAlerts = False
Worksheets("Sheet1").Protect
End Sub
Thanks
TK
Bookmarks