Hi Sheldon,

You could use a function like:

Function IsProtected(Optional ws As Worksheet) As Boolean
If ws Is Nothing Then Set ws = Activesheet
If ws.ProtectScenarios Or _
ws.ProtectDrawingObjects Or _
ws.ProtectContents Then
IsProtected = True
End If
End Function

---
Regards,
Norman



"Sheldon" wrote in message
...
How do I question in code whether a worksheet is protected or not?

Thanks