Se você tem uma planilha em Excel com dados protegidos por senha esquecida ou perdida, use este CÓDIGO VBA para QUEBRAR A SENHA.
Basta copiá-lo no Visual Basic, executá-lo com a planilha protegida ativa, e aguardar alguns segundos o seguinte aviso: "Sua planilha foi desbloqueada".
ATENÇÃO: Esta Macro quebra, apenas, a Senha de Proteção de planilha (Ferramentas/Proteger/Proteger planilha). Não tendo nenhuma atuação na senha de abertura do Arquivo.
______________________________________Basta copiá-lo no Visual Basic, executá-lo com a planilha protegida ativa, e aguardar alguns segundos o seguinte aviso: "Sua planilha foi desbloqueada".
ATENÇÃO: Esta Macro quebra, apenas, a Senha de Proteção de planilha (Ferramentas/Proteger/Proteger planilha). Não tendo nenhuma atuação na senha de abertura do Arquivo.
Sub Desbloqueia_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 "Sua planilha foi desbloqueada "
Exit Sub
End If
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
End Sub
______________________________________Essa dica veio, por e-mail, do meu amigo Carlos, fera em Excel.
13 comentários:
Muito obrigada! Deu certinho, só faltou vc explicar como abre o visual basic, pq nem todo mundo sabe,mas consegui desboquear com sucesso, valeu!!!
Para a abertura do Visual Basic(VB), ou você abre pelo atalho (Alt + F11), ou pela guia Desenvolvedor, caso não esteja aparecendo a guia, basta clicar no botão do Office > Opções do Excel, e Habilitar a opção (Mostrar guia Desenvolvedor na Faixa de Opções). com a mesma habilitada, clique na guia, você verá um botão chamado Visual Basic. Pronto, agora e só colar o código!
Valeu, obrigado!!!!
Muito bom, funciona, acabei de desbloquer planilha - 12/11/2013
Perfect!!!
Muito bom. Salvei uma planilha
Amigos,
protegi uma planilha utilizando Salvar Como em Ferramentas - Opções Gerais. Peço ajuda para desbloqueá-la.
Grato
Boa tarde nao consegui...
O VB tbm está bloqueado... :(
Raul
Funcionou perfeitamente. Muito obrigado.
Valeu mesmo. Excelente dica.
lauromilton@hotmail.com, valeu mesmo, excelente dica, saúde para você.
Desbloqueia só algumas planilhas pequenas, outras fica processando a vida inteira e não consegue desbloquear, não funciona para todas.
Coloquei esse código VBA porém não consigo desbloquear as planilhas luz, teria alguma outra forma?
Postar um comentário