setting the protect option

[Guest]

I have a worksheet that has protection switched on. When a certain routine is
run I need to turn the protection off do the routine then turn it back on
again.

When I initially protect the worksheet I need to set the Edit Objects so
that my routines will run properly.

Unfortunately I can't seem to set that back on again when I turn the protect
back on inside my code.

Is there a way to turn the protect back on and use edit object from within
VBA?

 

[Guest]

This is the code I generally use

'Unprotect
ActiveSheet.Unprotect password:="XXX"

'Protect
With ActiveSheet
.EnableSelection = xlNoRestrictions
.Protect Contents:=True, password:="XXX", DrawingObjects:=True,
UserInterfaceOnly:=False
End With

 

[Guest]

Yes but I cant seem to find a command for setting the EditObject part of
protect.

 

[Guest]

Why not setting the individual object property to unlock?