TrabalhosGratuitos.com - Trabalhos, Monografias, Artigos, Exames, Resumos de livros, Dissertações
Pesquisar

Desproteger Planilhas

Monografias: Desproteger Planilhas. Pesquise 862.000+ trabalhos acadêmicos

Por:   •  30/9/2013  •  244 Palavras (1 Páginas)  •  382 Visualizações

Como Desproteger e Quebrar Senha de Planilha Excel 2007

Segue abaixo um procedimento com macro para desbloquear em apenas alguns segundos uma planilha protegida por senha no EXCEL.

Siga os passos abaixo conforme indicado.

Passo 1: Abra a planilha protegida e digite ALT+F11

Passo 2: Se você fez certo o passo anterior agora deverá estar aberto o Microsoft Visual Basic.

Vá em INSERIR > MÓDULO

Passo 3: Insira a rotina abaixo copiando e colando desde a linha "Sub Desbloqueia_Planilha()" até "End Sub"

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

Passo 4: Clique no disquete em Salvar na tela de edição da macro.

Passo 5: Digite ALT+F11 novamente para retornar a planilha protegida.

Digite ALT+F8. Selecione sua macro (Desproteger_Planilha) e clique em executar

Passo 6: Aguarde alguns segundos e após a execução da macro será exibida a mensagem "Sua planilha foi desbloqueada

...

Disponível apenas no TrabalhosGratuitos.com