protect all worksheets on save event

[GilEytan]

Hi all,

i whant to perform protection to all worksheets on the event of saving workbook,
having office 2010.

this is an easy enough task to execute:
on triger workbook_beforesave i am calling ProtectAllSheets sub,

Please Login or Register  to view this content.

this sub works well when the user press ctrl+S to save the workbook,
but when i write a command to save the workbook:
thisworkbook.save
goes crazy, the unprotect and protect commands does nothing

any advice?


Gil

[BellyGas]

Just before the 'thisworkbook.save' put 'ProtectAllsheets'.