Como criar proteção de senha usando uma macro
Você gostaria de garantir que todas as planilhas em uma pasta de sua escolha sejam protegidas por senha usando uma macro? Isso pode ser útil se você estiver tendo muitos problemas para proteger as planilhas individualmente ou se desejar proteger todas as pastas de trabalho em um diretório automaticamente. Use a seguinte macro para atribuir a senha "proteger" a todas as planilhas na pasta ativa:
Sub AllSchuetzen ()
Dim Sheet As Worksheet
Para cada folha em ActiveWorkbook.Worksheets
Blatt.Protect ("proteção")
Próxima folha
End Sub
Em vez do texto "Schutz", use a senha de sua escolha. Obviamente, esse código de programa só faz sentido se você inseri-lo fora da pasta de trabalho na qual está criando a proteção. Caso contrário, todos os usuários podem ler a senha no texto de origem do VBA.
Para poder alterar algo nas planilhas protegidas, você deve remover a proteção. Você pode fazer isso manualmente com o comando EXTRAS - PROTEÇÃO - CANCELAR PROTEÇÃO DE FOLHA. Este comando só está disponível se a planilha atual estiver realmente protegida.
Se você deseja liberar todas as planilhas protegidas novamente usando uma macro, use o seguinte código de programa:
Sub AllExposure ()
Dim Sheet As Worksheet
Para cada folha em ActiveWorkbook.Worksheets
Blatt.Unprotect ("proteção")
Próxima folha
End Sub
