Desproteger Planilha com proteção do Excel
Hojé quando estava trabalhando com duas planilhas que sempre utilizo todo mês ao qual antes eram três porem incorporei o código de duas em uma apenas, facilitando minha vida, no entanto esta terceira que estava protegida não havia até então meu conhecimento sobre como desprotege-lá sem o código de proteção, daí resolvi pesquisar um pouco na internet e não foi preciso muito, agora estou com uma planilha apenas, facilitando muito e economizando meu tempo.
O
"Eu tive esta necessidade e acredito que possa ajudar caso ocorra algo similar com mais algéum.
Inclui uma senha de proteção de edição em uma planilha e não consegui mais editá-la.
Fiz uma pesquisa e notei muitos comentários sobre estas situações em empresas onde alguns funcionários são demitidos e acabam criando as senhas para impedir o acesso a dados da empresa para os colegas que ficam. Bom, esquecimento ou qualquer que seja a necessidade, muitas vezes esta senha pode acabar sendo um pesadelo.
Vamos ver alguns passos bem simples para desproteger a planilha que devem funcionar em 90% dos casos onde a proteção esteja dentro da planilha.Vamos lá:
1ª Passo - Abra a planilha no Microsoft Excel e digite Alt+F11.
2º Passo - Deve estar aberto o Microsoft Visual Basic. Agora vá em Inserir ¬ Módulo.
3º Passo - Insira a o procedimento abaixo:
4º Passo - Digite Alt+F11 novamente e voltará para a planilha. Aperte ALT+F8 selecione a Macro (Desproteger_Planilha) e clique em executar.
5º Passo – Após execução será exibida a mensagem "Planilha Desprotegida!"
Pronto, pode seguir trabalhando com sua planilha agora que não estará mais bloqueada.
PS. O 4º Passo deve ser executado a cada guia protegida.
Lembre-se de salva-la após os procedimentos para não ter que executa-los novamente no próximo acesso."
O
"Eu tive esta necessidade e acredito que possa ajudar caso ocorra algo similar com mais algéum.
Inclui uma senha de proteção de edição em uma planilha e não consegui mais editá-la.
Fiz uma pesquisa e notei muitos comentários sobre estas situações em empresas onde alguns funcionários são demitidos e acabam criando as senhas para impedir o acesso a dados da empresa para os colegas que ficam. Bom, esquecimento ou qualquer que seja a necessidade, muitas vezes esta senha pode acabar sendo um pesadelo.
Vamos ver alguns passos bem simples para desproteger a planilha que devem funcionar em 90% dos casos onde a proteção esteja dentro da planilha.Vamos lá:
1ª Passo - Abra a planilha no Microsoft Excel e digite Alt+F11.
2º Passo - Deve estar aberto o Microsoft Visual Basic. Agora vá em Inserir ¬ Módulo.
3º Passo - Insira a o procedimento abaixo:
Sub Desproteger_Planilha()
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
On Error Resume Next
For i = 65 To 66
For j = 65 To 66
For k = 65 To 66
For l = 65 To 66
For m = 65 To 66
For i1 = 65 To 66
For i2 = 65 To 66
For i3 = 65 To 66
For i4 = 65 To 66
For i5 = 65 To 66
For i6 = 65 To 66
For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox "Planilha Desprotegida! "
Exit Sub
End If
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
End Sub
4º Passo - Digite Alt+F11 novamente e voltará para a planilha. Aperte ALT+F8 selecione a Macro (Desproteger_Planilha) e clique em executar.
5º Passo – Após execução será exibida a mensagem "Planilha Desprotegida!"
Pronto, pode seguir trabalhando com sua planilha agora que não estará mais bloqueada.
PS. O 4º Passo deve ser executado a cada guia protegida.
Lembre-se de salva-la após os procedimentos para não ter que executa-los novamente no próximo acesso."
Comentários
Postar um comentário