Pessoal preciso de uma ajuda,

Gostaria de saber se alguém conhece uma macro que oculta e salva as sheets (Aba) automaticamente ao sair do excel, pois atualmente estou tendo que ocultar e salvar toda vez que saio do excel.

Para usar o código abaixo, eu ocultei a plan2 e criei uma proteção na revisão ->Proteger pasta de trabalho->marquei x na estrutura-> e digitei senha 1234
apos, ocultei manulmente, e salvei, onde toda vez que abro a planilha, se não habilitar a macro, o excel não mostrara a aba plan2, mas após eu habilitar e mostrar a plan2, se seu salvar e sair do excel, ao abrir novamente a planilha fica exposto a plan2, por isso estou querendo essa macro.

Private Sub Workbook_Open()

ActiveWorkbook.Unprotect "1234"
Sheets("Plan2").Visible = True

End Sub