code vergeten

[zanfa11]

Beste

Ik heb een Excel bestand gemaakt en beveiligd met een code. maar ik ben de code vergeten. Hoe kan dit probleem oplossen?

Mvg

ZANFA

 

[spaarie]

Is je bestand beveiligd of de werkmap

Sub WorkBookPasswordBreaker()
  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
     
        
 ActiveWorkbook.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 Err.Number = 1004 Then
    Err.Number = 0
  Else
      MsgBox "One usable password is " & 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
    
  MsgBox "No password found!"

End Sub

 

[zanfa11]

Ik kan het bestand niet openen

Mvg

 

[spaarie]

Dan zou ik met google zoeken naar een password remover voor Excel...

 

[ExcelAmateur]

Je zou ook bij iemand die Openoffice gebruikt kunnen vragen, ik heb wel eens gelezen dat het wachtwoord daar niet werkt.
Of bij iemand de op een Apple Pc werkt.

 

[Venga]

De kans dat je met een password remover je wachtwoord kraakt is wel heeeel er klein hoor... als je een moeilijk wachtwoord hebt gebruikt kan het sowieso dagen duren. (En dan moet je je PC dus continu aan laten staan...)

 

[gast0660]

Hoi Zanfa,
Ik kan hoogst waarschijnlijk de code wel ontdekken, zeker tot excel 2010, maar dan moet je het bestandje wel mailen naar mij via helpmij, maar als je iemand anders zijn ontwerp probeert te achterhalen werk ik niet mee
Greetz

 

[zanfa11]

Beste

Bdankt voor uw reactie. Het is mijn simpele bestandje. Zie bijlage Bekijk bijlage berekening.xlsx

Mvg

 

[plongske]

Geprobeerd met open office en er wordt ook een code gevraagd.

 

[keesbl]

Geprobeerd op een Mac, en er wordt ook om een wachtwoord gevraagd

Kees

 

[ExcelAmateur]

Jammer dat het op een Mac en OpenOffice niet lukt.

Misschien heb je wat aan deze informatie.
http://www.filemaker.com/nl/help/html/fmp_basics.3.26.html

 

[gast0660]

Hoi,
Voorlopig nog geen resultaat, maar er nog mee bezig.

 

[gast0660]

Hoi,
In bijlage uw bestandje zonder paswoord
have fun

 

[spaarie]

Je doet je naam wel eer aan
Denk dat meerdere helpers inclusief ik wel wil weten hoe je het gedaan hebt en/of met welke tool.

 

[gast0660]

Hoi Spaarie,
Heb op het werk volgend progje
https://www.elcomsoft.com/aopr.html
Hebben we regelmatig nodig omdat de nachtploeg graag loopt te klooien met bestanden en onze slimme ingenieurs hun eigen zaakjes zo proberen te beschermen dat ze erzelf niet meer ingeraken en dan kloppen ze aan bij de informatica afdeling.
Soms moet je wat geduld hebben, zoals bij bovenstaand bestandje heeft het ongeveer 24 uur geduurd, maar werkt wel perfect.
Greetz

 

[spaarie]

Pff 24 uur...
Bedankt voor de info Jack!

 

[gast0660]

Graag gedaan Spaarie,
Soms duurt het maar een paar minuten. Draait op de achtergrond, heb je geen last van

Greetz

 

[plongske]

@ gast0660
Bedankt voor de info, maar ik zou er toch spaarzaam mee omgaan met het kraken van bestanden voor het forum.

 

[formatfrits]

aopr, schitterend programma, vooral de portable versie. Gebruik het regelmatig voor mensen die passwoorden vergeten. onmisbaar op een goede toolstick.

 

[zanfa11]

Hartelijk bedankt

U bent fantastisch :thumb:. Ook bedankt aan iederen die de moeite gedaan heeft om te helpen.

Mvg

Zanfa