These should cover you

ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _
True, AllowFormattingCells:=True

--
--
-John
Please rate when your question is answered to help us and others know what
is helpful.

"C_Ascheman" wrote in message
...
I know that to Select Unlocked Cells I use this code:

ActiveSheet.EnableSelection = xlNoSelection

If I want to Edit Objects, Select Locked Cells, and Format Cells when I
enable the worksheet protection then what do I need to do this. I have
tried
searching through the Excel VBA help files, and on here. I have not found
what I need. I will continue looking, but would appreciate it if someone
could help me with what I am looking for.

Thanks,
C_Ascheman