excel2003设置了密码破解(excel2003密码怎么破)

1. excel2003密码怎么破

先安装个Office2003-2010兼容包试试，不行就只能升级excel到2010。

2. excel2003密码怎么解除

那么怎么给Excel设置密码呢？我们一起来看看吧：

方法如下：

一、找到你想要设置密码的Excel表格，点击文件菜单，选择“另存为”：

二、弹出文件框后，在右下角找到“工具（L）”并下拉选择“常规选择（G）”：

三、此时会弹出一个小方框，在“打开权限密码”“修改权限密码”里写下想要设置的密码（两处密码可以不一样，知晓权限密码的人能观看Excel表格但不能更改表格内容），设置完成后点击“确定”：

四、设置完成后需要二次确认密码，第一次输入的密码为【打开权限密码】，第二次输入的密码为【修改权限密码】。确认无误后，点击“确定”保存密码：

五、问题“文件已存在是否要替换它”，选择“是”：

六、这样就完成Excel表格的密码设置了，保险起见，关闭Excel表格再次打开检查是否设置密码完成。如果有弹出录入密码的提示，则表示密码设置成功。

3. excel2003怎么加密码保护

1、先全选表格（点表格左上角），点格式＞单元格＞保护，把锁定和隐藏前的钩去掉；

2、点编辑＞定位＞定位条件＞公式＞确定；

3、再点格式＞单元格＞保护，在锁定和隐藏前的方框中打上钩；

4、点工具＞保护＞保护工作表，在保护工作表对话框中输入密码（如不需要密码也可以不输）＞确定。这样有公式的单元格受到保护，其它单元格不受影响，照常可输入数据。

4. excel2003密码忘记了怎么办

1、用administrator登录，一般做系统后管理员密码都是空的。开机后按住CTRL+ALT+DEL

2、用DOS引导盘在DOS下把C:\WINDOWS\repair下的SAM文件复制到C:\WINDOWS\system32\config下，覆盖就行了。这样密码就恢复到原始密码了。

3、用深山红叶的DOS工具箱恢复。

5. Excel2003怎么设置密码

①进入菜单栏的“工具”中的“选项”；

②在弹出的“选项”中，选择“安全性”，然后在“打开文件时的密码”后面输入密码；

③单击确定按钮后会再次提示你确认密码；再次输入刚才的密码，然后确定加密即可成功。再次打开该文档的时候发现现在已经不能直接进入文档内容了，必须要输入正确的密码才能进入。

6. excel2003怎么设置打开密码

如果想让别人打开Excel表格时就需要密码，那么点击左上角的图标，然后选择准备-加密文档。

2

在输入框中输入密码之后点击确定。

3

此时excel会让你重新输入密码确认。

4

点击保存，由于小编默认保存成Excel 97-2003版本，这里会提示是否保存成2007格式的文件来获得更高的安全性，这里选择是或者否对于一般用户来说都可以。

5

关闭表格之后再次打开，这时就必须先输入密码才可以打开了。这时小编说一下，大家切记要记住自己设置的密码，否则忘了之后很难再打开。

6

如果想要取消或者更换密码，那么输入密码打开文件后重复前两步，取消密码就是把原有密码删掉后确定，改密码的话直接改就可以了。

END

加密方法二

第一种方法别人只有输入密码之后才能看到内容，如果你想让别人只可以看见内容而不能更改，这样不必把密码告诉别人，那么就用第二种方法。

打开表格后点击左上角然后选择另存为。

选择工具-常规选项

这时会让你输入打开权限密码和修改权限密码。

输入密码确定后同样会提示你重新输入确定，最后保存就可以了。

这里解释一下，打开权限密码和方法一中是一样的，就是你打开时就必须输入密码才能看到内容；而设置修改权限密码后你可以不用密码选择用只读的方式打开查看内容，想要修改就必须输入密码。

7

只读方式打开后修改内容，在保存时就会提示你只能保存副本，原有的数据不会被改动。

7. excel2003如何加密码

2003EXCEL工作表使用密码锁定使之看不到，可设置密码保护，工具，选项，保护，设置密码，保存，即对文件设置需要密码才能打开查看。

8. excel2003 密码

EXCEL工作表保护密码破解

方法:

1\打开文件

2\工具---宏----录制新宏---输入名字如:aa

3\停止录制(这样得到一个空宏)

4\工具---宏----宏,选aa,点编辑按钮

5\删除窗口中的所有字符(只有几个),替换为下面的内容:(复制吧)

6\关闭编辑窗口

7\工具---宏-----宏,选AllInternalPasswords,运行,确定两次,等2分钟,再确定.OK,没有密码了!!

内容如下：

Public Sub AllInternalPasswords()

' Breaks worksheet and workbook structure passwords. Bob McCormick

' probably originator of base code algorithm modified for coverage

' of workbook structure / windows passwords and for multiple passwords

'

' Norman Harker and JE McGimpsey 27-Dec-2002 (Version 1.1)

' Modified 2003-Apr-04 by JEM: All msgs to constants, and

' eliminate one Exit Sub (Version 1.1.1)

' Reveals hashed passwords NOT original passwords

Const DBLSPACE As String = vbNewLine & vbNewLine

Const AUTHORS As String = DBLSPACE & vbNewLine & _

"Adapted from Bob McCormick base code by" & _

"Norman Harker and JE McGimpsey"

Const HEADER As String = "AllInternalPasswords User Message"

Const VERSION As String = DBLSPACE & "Version 1.1.1 2003-Apr-04"

Const REPBACK As String = DBLSPACE & "Please report failure " & _

"to the microsoft.public.excel.programming newsgroup."

Const ALLCLEAR As String = DBLSPACE & "The workbook should " & _

"now be free of all password protection, so make sure you:" & _

DBLSPACE & "SAVE IT NOW!" & DBLSPACE & "and also" & _

DBLSPACE & "BACKUP!, BACKUP!!, BACKUP!!!" & _

DBLSPACE & "Also, remember that the password was " & _

"put there for a reason. Don't stuff up crucial formulas " & _

"or data." & DBLSPACE & "Access and use of some data " & _

"may be an offense. If in doubt, don't."

Const MSGNOPWORDS1 As String = "There were no passwords on " & _

"sheets, or workbook structure or windows." & AUTHORS & VERSION

Const MSGNOPWORDS2 As String = "There was no protection to " & _

"workbook structure or windows." & DBLSPACE & _

"Proceeding to unprotect sheets." & AUTHORS & VERSION

Const MSGTAKETIME As String = "After pressing OK button this " & _

"will take some time." & DBLSPACE & "Amount of time " & _

"depends on how many different passwords, the " & _

"passwords, and your computer's specification." & DBLSPACE & _

"Just be patient! Make me a coffee!" & AUTHORS & VERSION

Const MSGPWORDFOUND1 As String = "You had a Worksheet " & _

"Structure or Windows Password set." & DBLSPACE & _

"The password found was: " & DBLSPACE & "$$" & DBLSPACE & _

"Note it down for potential future use in other workbooks by " & _

"the same person who set this password." & DBLSPACE & _

"Now to check and clear other passwords." & AUTHORS & VERSION

Const MSGPWORDFOUND2 As String = "You had a Worksheet " & _

"password set." & DBLSPACE & "The password found was: " & _

DBLSPACE & "$$" & DBLSPACE & "Note it down for potential " & _

"future use in other workbooks by same person who " & _

"set this password." & DBLSPACE & "Now to check and clear " & _

"other passwords." & AUTHORS & VERSION

Const MSGONLYONE As String = "Only structure / windows " & _

"protected with the password that was just found." & _

ALLCLEAR & AUTHORS & VERSION & REPBACK

Dim w1 As Worksheet, w2 As Worksheet

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

Dim m As Integer, n As Integer, i1 As Integer, i2 As Integer

Dim i3 As Integer, i4 As Integer, i5 As Integer, i6 As Integer

Dim PWord1 As String

Dim ShTag As Boolean, WinTag As Boolean

Application.ScreenUpdating = False

With ActiveWorkbook

WinTag = .ProtectStructure Or .ProtectWindows

End With

ShTag = False

For Each w1 In Worksheets

ShTag = ShTag Or w1.ProtectContents

Next w1

If Not ShTag And Not WinTag Then

MsgBox MSGNOPWORDS1, vbInformation, HEADER

Exit Sub

End If

MsgBox MSGTAKETIME, vbInformation, HEADER

If Not WinTag Then

MsgBox MSGNOPWORDS2, vbInformation, HEADER

Else

On Error Resume Next

Do 'dummy do loop

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

With 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 .ProtectStructure = False And _

.ProtectWindows = False Then

PWord1 = Chr(i) & Chr(j) & Chr(k) & Chr(l) & _

Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _

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

MsgBox Application.Substitute(MSGPWORDFOUND1, _

"$$", PWord1), vbInformation, HEADER

Exit Do 'Bypass all for...nexts

End If

End With

Next: Next: Next: Next: Next: Next

Next: Next: Next: Next: Next: Next

Loop Until True

On Error GoTo 0

End If

If WinTag And Not ShTag Then

MsgBox MSGONLYONE, vbInformation, HEADER

Exit Sub

End If

On Error Resume Next

For Each w1 In Worksheets

'Attempt clearance with PWord1

w1.Unprotect PWord1

Next w1

On Error GoTo 0

ShTag = False

For Each w1 In Worksheets

'Checks for all clear ShTag triggered to 1 if not.

ShTag = ShTag Or w1.ProtectContents

Next w1

If ShTag Then

For Each w1 In Worksheets

With w1

If .ProtectContents Then

On Error Resume Next

Do 'Dummy do loop

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

.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 Not .ProtectContents Then

PWord1 = Chr(i) & Chr(j) & Chr(k) & Chr(l) & _

Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _

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

MsgBox Application.Substitute(MSGPWORDFOUND2, _

"$$", PWord1), vbInformation, HEADER

'leverage finding Pword by trying on other sheets

For Each w2 In Worksheets

w2.Unprotect PWord1

Next w2

Exit Do 'Bypass all for...nexts

End If

Next: Next: Next: Next: Next: Next

Next: Next: Next: Next: Next: Next

Loop Until True

On Error GoTo 0

End If

End With

Next w1

End If

MsgBox ALLCLEAR & AUTHORS & VERSION & REPBACK, vbInformation, HEADER

End Sub

9. excel2003设置了密码怎样解除

excel文档密码破解方法汇总：借助Excel密码破解工具，Excel密码破解只需几秒钟的事情。

1、AccentOFFICEPasswordRecovery特点：成功破解过的密码都会被记录下来用作下一次破解，破解已经破解过文档不费吹灰之力。

2、OfficePasswordRemover特点：在线秒杀所有采用普通加密方式的“.doc”、“.xls”、“.ppt”文档。缺点：付款才能看到完整的被破解的文档，必须上网才能用。

3、AdvancedOfficePasswordRecovery特点：功能无比强大，如果上面两款都破解不了，这款是最终武器。

4、OfficePasswordUnlocker特点：由于前三款Excel密码破解工具已经够用，这款功能其实也不差，但对笔者而言是凑数用。方法：先用MicrosoftOffice Excel2003（可用金山WPSOffice2012表格代替）创建一个“2003.xls”的普通方式加密Excel文档，然后用OfficePasswordRemover这个在线破解工具来破解，1,2,3，3秒之后，就生产一个已经被成功破解的新Excel文档——2003（DEMO）.xls。破解一个普通加密方式的Excel文档，只需3秒钟！如果真的不信，可以自己测试一下。

10. excel2003密码破解

下载opremove1.0.0.2版本的大部分excel2003的文件都可以解密，能查出密码的要用这个软件,Advanced Office Password Recovery。时间要长一些。

请把样表发送到linfzz@126.com，可以帮你分析一下。

11. excel2003密码设置

你指的是加密吧！ 在工具，选项，安全性里取消掉就可以了。