excel2003设置密码(excel2003怎么设置打开密码)

1. 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秒钟！如果真的不信，可以自己测试一下。

2. excel2003表格设置密码怎么设

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

3. excel2010设置打开密码

excel文件为了安全性设置了打开密码，但是时间久了可能就把打开密码忘记了

这种情况下，可以用软件尝试把密码找回来，因为打开密码只能找回正确密码才能解开，没有其他办法。

打开软件，点击进入【找回密码】 软件链接

然后把excel文件添加到软件中，选择一个找回方法，点击【开始】进行密码找回

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

先了解一下密码是怎么设置的。 excel2007的文档加密：

1. 打开需要加密的Excel2007文档，点击左上角的Office标识，在弹出的对话框中选择“另存为”，或者直接使用快捷键“F12”调出对应窗口；

2. 在弹出的另存为窗口左下角，找到“工具”选项。注意这里是关键，点击它，在弹出的窗口中，选择“常规选项”，在弹出的对话窗口中，就可以对该Excel文档进行密码设置；

3. 密码设置分为“打开权限密码”、“修改权限密码”以及“建议只读” 。 excel2003的文档加密： 工具--选项--安全性--此工作簿的文件共享设置里修改权限密码处输入你设置的密码，确定，重复输入即可。 取消密码的方法就是，按照上面的操作步骤打开需要设置密码的地方，把密码（显示星号）删除掉，再保存就可以了。

5. excel2003加密码怎么设置密码

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

方法如下：

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

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

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

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

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

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

6. excel2003忘记密码如何打开

答：excel忘记表格密码？

1选中加密文件，后缀名改为rar。

2双击该文件，选择打开XL文件夹。

3打开文件夹，将sheet1文件拖到桌面。

4右键该文件选择记事本打开，查找。

5删除该词所在括号内的全部内容并保存。

6点击确定，将后缀名重新改为XLSX即可。

以上6步帮你快速解决问题。你学会了吗？

7. Excel2003设置密码

一、首先打开2003版本的excel表格，需要设置excel的密码时可以点击顶部主菜单中的“工具”菜单。

二、点击工具菜单之后，会弹出一列的功能菜单，找到“选项”菜单并点击进入设置。

三、有时候我们点击选项菜单中，也会弹出一个未安装校对工具的提示，不用管它，可以点击关闭按钮或者确定按钮。

四、在弹出来的选项窗口中，找到右上角的“安全性”选项菜单，并点击这个按钮。

五、来到excel表格的加密设置，在打开权限密码右侧的输入框中输入提前想好的密码，然后点击确定。点六、击确定之后，还会弹出确认密码的提示窗口，这时候只需要再次输入跟第一次一样的密码，然后再次点击确定就可以了。

8. excel设置进入密码

答需要

excel 设置密码 第一种方法：

1、先打开“受密码保护文件.xlsx”文件，点击左上方的“office按钮”；

2、然后选择“另存为”-“Excel工作薄”；

3、点击左下方“工具”-“常规选项”；

4、完成以后步骤后，就可以看到弹出密码框，输入密码，有打开权限密码和修改权限密码，具体根据自己的需要来定。设置完成后，点击“确定”然后再输一次密码即可。

5、密码已经设置好了，打开另存为的文件，就会有输入密码的提示。

第二种方法：

打开文件，点击左上方的“office按钮”-“准备”-“加密文档”

在弹出的密码框中输入密码，点击确定，再次输入密码即可。

设置完成后，保存文件，然后再次打开的时候就会有输入密码的提示。

注意事项

密码是分大小写的， 输入密码时候注意是否开启了大写键盘；

如果需要删掉密码，还是重复设置密码的步骤，去掉密码即可。

9. 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

10. excel2003密码设置在哪里

一、先说整个工作表保护加密的方法

　excel加密功能如何使用，具体步骤如下：

　　1、打开excel软件，新建一个工作簿，默认有三张表格。

　　2、点击“审阅”选项卡，点击“保护工作表”。

　　3、设置密码，下面可以选择具体的权限，可以全部勾选，也可以部分勾选。

　　4、选择保护选定单元格，双击单元格的时候会报错，提示正在试图修改被保护的只读单元格或图表，不能编辑它.

　　5、我们知道一个工作簿中间可以有多个工作表，默认有sheet1，sheet2，sheet3，我们可以对工作表进行增删改等操作，excel提供保护整个工作簿的功能。设置密码保护后，就不能修改工作表。

　　6、设置密码，同样权限可以选择，一般要选结构。

　　7、右键工作表，里面的编辑功能菜单都是灰色的，不能编辑。

　　8、如果自己要对所保护的excel文档进行操作的话，我们需要撤销保护。同样在工具-保护中间，输入密码，撤销保护。

二、部分内容保护加密

1、在以上内容中设置好保护整个工作表后，可以进行部分不加密的区域的操作：

在“审阅”选项卡里，选择允许用户编辑区域，依次按照下列图片所示的框起来的步骤操作。将D1：E13的区域设置为可编辑的区域。

excel不同版本密码设置位置不同

　　2003版本的在工具——保护—中间设置保护密码；

11. excel2003 密码

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

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

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

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