How to determine if the workbook is protected?

S

Shasur

You can try the following

Sub Check_If_WB_Protected()


If (ActiveWorkbook.ProtectWindows = True Or ActiveWorkbook.ProtectStructure
= True) Then
MsgBox "Workbook is protected"
Else
MsgBox "Workbook is not protected"
End If

End Sub


Cheers
Shasur
 
F

filo666

Thanks, exactly what I was looking for.

could you give it a check to my other post at top?

Thanks
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top