Thread: check protection
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
masterphilch masterphilch is offline
external usenet poster
  
Posts: 35
Default check protection
that was fast!!
thanks a lot

Paul B wrote:

masterphilch. here is one way

Sub testme()
With ActiveSheet
If .ProtectContents Then
MsgBox "Sheet is protected"
Else
MsgBox "Sheet is not protected"
End If
End With
End Sub

Reply With QuoteReply With Quote