Sheet Protection

  • Thread starter Thread starter Mike
  • Start date Start date
M

Mike

Hi. I have a macro that is activated on any Worksheet
Change. I would like to protect this sheet so that the
user will only enter data in the appropriate cells. When
I protect the sheet, however, I get an application
error. The application error occurs when the macro
attempts to delete a shape ...

Any ideas?

Thanks,
Mike.
 
Mike,

Use the UserInterfaceOnly parameter when you protect the sheet.
This allows VBA code to do anything to the sheet; it only
protects against use action with the keyboard and mouse. E.g.,

Worksheets(1).Protect UserInterfaceOnly:=True


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
 
Protect your worksheets with code with userfaceonly like this
Place this in the Thisworkbook module.

The macro's will be working now
It will only protect the userfaceonly

Right click on the Excel icon next to File in the menubar
And choose View code

You are now in the Thisworkbook module
Paste the Event in this place
Alt-Q to go back to Excel

Private Sub Workbook_Open()
Dim sh As Worksheet
Application.ScreenUpdating = False
For Each sh In ThisWorkbook.Worksheets
sh.Protect "ABCD", , , userinterfaceonly:=True
Next sh
Application.ScreenUpdating = True
End Sub
 
Back
Top