Workbook_Open secundário confidencial ()
WS não ofuscante como a folha
MyPassword não ofuscante como a corda
MyPassword = “ABC”
Para cada WS em ActiveWorkbook.Worksheets
WS. Proteger a senha: =MyPassword, UserInterfaceOnly: =True, índices: =True
Em seguida
Submarino da extremidade
|