17 de abr. de 2015

COMO DESBLOQUEAR PLANILHAS DO EXCEL

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
For j = 65 To 66
On Error Resume Next For i = 65 To 66 For k = 65 To 66
For i2 = 65 To 66
For l = 65 To 66 For m = 65 To 66 For i1 = 65 To 66 For i3 = 65 To 66
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
For i4 = 65 To 66 For i5 = 65 To 66 For i6 = 65 To 66 For n = 32 To 126
If ActiveSheet.ProtectContents = False Then
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _ Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
End Sub
MsgBox "Sua planilha foi desbloqueada " Exit Sub End If Next Next Next Next Next Next Next Next Next Next Next Next

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".

Espero ter ajudado! Deixe seu comentário abaixo, ok!

Nenhum comentário:

Postar um comentário

Insira suas dúvidas, dicas, pedidos ou comentário aqui.

Total de Visitantes