Dica do momento

Desproteger planilha com senha.

Enviado por admin, ter, 19/01/2010 - 22:39

Para desbloquear uma planilha protegida por senha, será necessário criar uma macro.

Testamos esta macro no MS Office 2007.

  • Abra o MS Excel 2007.
  • Clique na aba DESENVOLVEDOR (Como habilitar a aba desenvolvedor).
  • Clique no botão MACROS.
  • No campo NOME DA MACRO, digite por exemplo "DesprotegerPlanilha" [Sem aspas].
  • Clique no botão CRIAR
  • Copie e cole o código abaixo.

  Dim i, i1, i2, i3, i4, i5, i6 As Integer, j As Integer, k As Integer, 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 com sucesso!!!"
                              Exit Sub
                            End If
 
 
                           Next
                         Next
                       Next
                     Next
                   Next
                 Next
               Next
             Next
           Next
         Next
       Next
     Next

  • Execute o código apertando F5 do teclado.
  • Aguarde a mensagem de conclusão.

Pronto. A planilha estará desbloqueada.

OBS.: Utilize apenas este recurso para planilhas de sua autoria, onde a senha foi esquecida. Respeite planilhas de terceiros que decidiram protegê-la por senha.

Fonte: http://www.guiadohardware.net/comunidade/desproteger-planilha/299297/