Carrie,
From a previous post by Norman Harker.......
John
<snip>
Here's a standard collation of password recovery facilities.
Please note that unauthorized use of password recovery techniques can
breach
software license agreements and leave you without otherwise available
assistance and remedies. You may also be liable to being sued or even
prosecuted under the terms of the software license. You can in some
cases be
in breach of terms of your employment and find yourself out on the
street.
You are warned that civil and criminal proceedings risks should not be
viewed lightly. If in any doubt, don't. Most, if not all software
providers,
will assist genuine cases by email free of charge.
Anyone who has comments or sites to add please feel free to respond.
You need SECTION 2. Please report back your success / failures with
commercial products as these comments will help others.
Obviously, this post comes with a complete money back guarantee. (You
paid
none; you'll get none back!)
The real lessons to be learned? Keep a track of your passwords. Look
after
your employees and they'll not leave without telling you the passwords!
Excel is not, and has never been made out to be secure as a mode of
storing
data.
SECTION 1 For Worksheet and Workbook (*Not* Protected (Un-openable)
files).
http://www.straxx.com/excel/password.html
Free of charge but requests a donation. Excel 5.0 up to XP. They've been
going for years and it does reveal *a* password rather than *the*
password
For Worksheet passwords up to 12 characters, the following code usually
works:
Sub PasswordBreaker()
'by Bob McCormick on NG: microsoft.public.excel.misc on 22 May
2001.
'Breaks worksheet password protection.
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 "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)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub
SECTION 2. File Protection Password Recovery
http://www.intertek.org.uk/
Excel Workbook recovery. Demo version up to 2 characters free. Full
version
for $5 advertises ability to recover any password.
Elcomsoft Advanced Office XP Password Recovery
http://www.elcomsoft.com/aoxppr.html
Unregistered (trial) version can be used during 30 days after
installation
(although it doesn't expire, actually) and has some limitations. They
have
programs for earlier versions. Cost of license $30
Lostpassword.Com
http://www.lostpassword.com/excel.htm
All versions of MS Excel are supported (including Excel 2002) $45.
Download
demo version covers 2 character passwords and works but not much use.
The
licensed version covers passwords up to 9 characters. They do have a 4-7
day
guaranteed decryption service for a fee!
AccentSoft Excel password recovery
http://www.denglad.com/en/excel.shtml
Free trial version for up to 4 characters. Covers Excel 97 - XP. License
$25
Soft4You
http://www.soft4you.com/excel/default.asp
Downloadable free trial up to 3 characters. Covers Excel 4.0 to XP.
Workbook
Version License $35 Workbook + VBA License $49. They also have a
guaranteed
password recovery service done on a per document basis.
Discount Password Recovery
http://www.discountpasswordrecovery.com/
Operates on a per document basis. 8+ characters can take 7-15 days and
costs
$167.95
HTH
