Essa proteção também ajuda a manter a consistência dos dados e reduzir a probabilidade de erros.
Aqui está um exemplo de código VBA que você pode usar para proteger todas as planilhas em uma pasta de trabalho com uma senha:
Sub ProtectAllSheets()
Dim ws As Worksheet
Dim password As String
password = “Test123”
For Each ws In Worksheets
ws.Protect Password:=password
Next ws
End Sub
Explicação do código:
- Dim password As String: Declara uma variável de senha para armazenar a senha a ser usada.
- password = “Test123”: Define o valor padrão para a senha. Você pode substituir “Test123” pela senha desejada.
- ws.Protect Password:=password: Define a propriedade Protect da planilha com uma senha predefinida, para que a planilha seja protegida.
Como usar macros para desproteger todas as planilhas de uma só vez
Desproteger uma planilha do Excel é indispensável quando você deseja alterar ou atualizar dados bloqueados anteriormente. Se muitas planilhas estiverem protegidas por senha, abri-las uma a uma pode ser muito demorado.
Usando macros VBA, você pode desproteger rapidamente todas as planilhas em uma pasta de trabalho, facilitando o acesso e a edição de dados.
Aqui está um exemplo de código VBA que você pode usar para desproteger todas as planilhas em uma pasta de trabalho:
Sub UnprotectAllSheets()
Dim ws As Worksheet
Dim password As String
password = “Test123”
For Each ws In Worksheets
ws.Unprotect Password:=password
Next ws
End Sub
Explicação do código:
- password = “Test123”: Define o valor padrão para a senha. Você deve substituir “Test123” pela senha apropriada.
- ws.Unprotect Password:=password: usa a senha especificada para abrir a proteção da planilha.