Query the thisworkbook.protect

Hi,

Does anyone know how I can test to see if a workbook has been protected?

Doing this for a sheet seems to be easy i.e.

If ws.ProtectContents = False Then Module2.lock_sheet ws

But how do I do it for the book? The reason I am asking is that there seems to be a bug whereby if you try and protect a book that is already protected, the effect is to remove the protection. This means I need to check the state before any application of the protection commands.

hope you can help me

thanks