Como quebrar senhas do Excel

Sunday, December 17, 2006 9:14
Posted in category Software

Ofertas Submarino

TV 22" LCD - 22LD330 - com 1 Enrtrada HDMI e 1 USB - LG
TV 22" LCD – 22LD330 – com 1 Enrtrada HDMI e 1 USB – LG
 R$ 699,00 
Veja mais
TV 19" LCD c/ HDMI, Entrada p/ PC e Design Black Piano L19W931 - AOC
TV 19" LCD c/ HDMI, Entrada p/ PC e Design Black Piano L19W931 – AOC
 R$ 599,00 
Veja mais
TV 22" LCD Entrada HDMI, USB e PC 22LH20R - LG
TV 22" LCD Entrada HDMI, USB e PC 22LH20R – LG
 R$ 799,00 
Veja mais
TV 32" LCD Scarlet Full HD 120hz Conversor 3 HDMI Bluetooth USB- LG
TV 32" LCD Scarlet Full HD 120hz Conversor 3 HDMI Bluetooth USB- LG
 R$ 1.999,00 
Veja mais

Excel Password Remover

via Peopleware

You can leave a response, or trackback from your own site.

14 Responses to “Como quebrar senhas do Excel”

  1. walisonsouza says:

    September 30th, 2007 at 11:14 pm

    tenho uma planilha so que esta protegida e esquesi à senha

    Responda este comentário

    phsluba@hotmail.com Reply:

    entre em na planilha que quer desproteger, clic no ícone superior esquerdo, vá em opções do excell, habilite visualização dinâmica e clic em ok, vá até o menu desenvolvedor/visual basic, ao abrir a tela em branco do lado direito, copie e cole a macro abaixo nela, clic em arquivo/fechar e voltar para Microsoft Excell, agora vá ao menu exibição/Macros/exibir Macros, clic duas vezes em cima da planilha que quiser desproteger na janela que abriu, espere alguns segundos e vai aparecer outra janelinha com a senha dentro dela.Pronto

    copie esta macro abaixo e faça como indiquei acima, espero que ter ajudado
    .

    Sub senha_xl()

    Dim i As Integer, j As Integer, k As Integer

    Dim l As Integer, m As Integer, n As Integer

    Dim i1 As Integer, i2 As Integer, i3 As Integer

    Dim i4 As Integer, i5 As Integer, i6 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 “Senha: ” & Chr(i) & Chr(j) & _

    Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _

    Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

    ActiveWorkbook.Sheets(1).Select

    Range(“a1″).FormulaR1C1 = Chr(i) & Chr(j) & _

    Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _

    Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

    Exit Sub

    End If

    Next: Next: Next: Next: Next: Next

    Next:
    Next: Next: Next: Next: Next

    End Sub

    Responda este comentário

  2. suelen neves loureiro says:

    October 26th, 2007 at 8:38 pm

    Oi.
    Estou cansada de buscar sites que só dizem que ensinam a quebrar a senha em planilhas no excel e é tudo BALELA….ENGANAÇÃO….
    Por favor espero que esse site seja um site decente e atende as minhas necessidades.
    Criei uma planilha no excel e coloquei senha de abertura…. mas esqueci…agora quando tento abrir essa pasta abre uma janelinha pedindo para colocar a senha….o que faço?

    Responda este comentário

  3. Rodrigo says:

    October 26th, 2007 at 8:44 pm

    Suelen, comece clicando no link “Excel Password Remover”, você irá até o blog Peopleware há o tutorial que precisa.

    Responda este comentário

  4. Fábio says:

    February 6th, 2008 at 10:36 am

    Estou com um problema sério no trabalho. Protegi uma planilha e não consgio me lembrar a senha. É urgente pois o relatório tem qe ser entregie até dia 12/02.
    Não conheço muito de informáica e fico luoco quando alguém orienta a gente a entrear um um site e diz “lá você encontra…” Por favor me mande o site com o local certo onde eu acho este programa. Não consegui encontrar com a dica “#3 Rodrigo – 26 October, 8:44 PM

    Suelen, comece clicando no link “Excel Password Remover”, você irá até o blog Peopleware há o tutorial que precisa.”

    Me ajudem!!!!

    Responda este comentário

  5. Rodrigo says:

    February 6th, 2008 at 11:16 am

    Caro Fábio, observe que este post é de 17/12/2006, nesse meio tempo o autor do blog Peopleware mudou a estrutura de links do site dele, mesmo assim era possível encontrar o programa, bastava digitar “Excel Password Remover” na caixa de buscas do referido blog.

    O Como Faço? tem mais de 1200 post e é impossível manter todos atualizados, pela própria dinâmica da internet.

    Imagine que você abra um jornal de um ano atrás, é possível que todas as informações ainda estejam atuais?

    Este blog é mantido como um hobby, disponível gratuitamente para qualquer leitor, portanto como tal, não é passível de exigências desse tipo.

    Espero que entenda, e continue acessando o Como Faço.

    Att.

    Rodrigo Cesarini

    Responda este comentário

  6. Jeffylevita says:

    August 8th, 2008 at 10:55 am

    como faço para quebra a senha do word manualmente? Eu sei que exite uma possibilidade de quebrar, só que não consegui encontrar.
    tem como me ajudar com esta situação?

    Responda este comentário

  7. Franciedson Ricardo says:

    September 3rd, 2008 at 1:53 pm

    Por favor preciso com urgencia

    Como quebro a senha do excel? coloquei e não me lembro não posso perder a planilha!

    Responda este comentário

  8. silvana ribas says:

    January 24th, 2009 at 12:12 pm

    Ola bom dia preciso com urgencia como faço para que a senha que eu coloquei na planilha excel seja quebrada ? Pois a senha que eu havia colocado nao me lembro dela. Como faço ?
    Por favor preciso com urgencia .
    Desde ja muito obrigada.

    Responda este comentário

  9. Felipe Excel says:

    November 28th, 2009 at 3:59 pm

    Esta macro funciona:

    Sub DesprotegerPlanilhaAtiva()
    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
    End Sub

    Responda este comentário

    ROBSON Reply:

    onde coloco esse código? tem como me orientar?

    Responda este comentário

    phsluba@hotmail.com Reply:

    recebi uma informação depois de usar sua macro( não é possível executar o código no modo interromper)

    Responda este comentário

  10. DNAUM says:

    April 27th, 2010 at 6:44 pm

    Felipe Excel cara esse macro é foda mesmo obrigado, robson (excel 2007) é só ir em exibiçao macro editar é ctrlc e v. flw

    Responda este comentário

  11. Sirog68 says:

    June 23rd, 2010 at 4:23 pm

    Valeu Felipe Excel estava a procura de algo a muito tempo boa macro!

    Responda este comentário

Leave a Reply

Comment Email Responder traduzido por:Gangue!