If you want to allow for any being set use OR

With ActiveSheet
If .ProtectContents OR .ProtectDrawingObjects OR _
etc.

--

HTH

RP
(remove nothere from the email address if mailing direct)


"ExcelMonkey" wrote in message
...
How do you wrap an If around the .Protect property for the
active sheet given that it has three other conditions
(DrawingObjects:=True, Contents:=True, Scenarios:=True)?
I only care about the cells/formulas.


If ActiveSheet.Protect Contents:=True Then
'code here
End if








-----Original Message-----
Surely, it is both, irrespective of order.

--

HTH

RP
(remove nothere from the email address if mailing direct)


"ExcelMonkey" wrote
in message
...
I know that I can lock cells and hide their formulas.

Selection.Locked = True
Selection.FormulaHidden = True

I also know that none of this kicks in unless the sheet
itself is protected.

ActiveSheet.Protect DrawingObjects:=True,
Contents:=True,
Scenarios:=True

How do I tell if a cell is protected? What property am
I
tesing for? Is it first the sheet and then the cell?

THanks




.