excel表格被设置了密码保护，无法更改，急需破解

Excel 表格被写入密码保护了 无法编辑表格里面的内容 那位高手知道怎么破解 请指教~

'去除VBA编码保护
Sub MoveProtect()
Dim FileName As String
FileName = Application.GetOpenFilename("Excel文件（*.xls & *.xla）,*.xls;*.xla", , "VBA破解")
If FileName = CStr(False) Then
Exit Sub
Else
VBAPassword FileName, False
End If
End Sub
'设置VBA编码保护
Sub SetProtect()
Dim FileName As String
FileName = Application.GetOpenFilename("Excel文件（*.xls & *.xla）,*.xls;*.xla", , "VBA破解")
If FileName = CStr(False) Then
Exit Sub
Else
VBAPassword FileName, True
End If
End Sub
'核心过程调用 无论是加密还是解密都必须经过的过程
Private Function VBAPassword(FileName As String, Optional Protect As Boolean = False)
If Dir(FileName) = "" Then
Exit Function
Else
FileCopy FileName, FileName & ".bak"
End If
Dim GetData As String * 5
Open FileName For Binary As #1
Dim CMGs As Long
'去除密码的
Dim DPBo As Long
For i = 1 To LOF(1)
Get #1, i, GetData
If GetData = "CMG=""" Then CMGs = i
If GetData = "[Host" Then DPBo = i - 2: Exit For
Next

If CMGs = 0 Then
MsgBox "请先对VBA编码设置一个保护密码...", 32, "提示"
Exit Function
End If

If Protect = False Then
Dim St As String * 2
Dim s20 As String * 1

'取得一个0D0A十六进制字串
Get #1, CMGs - 2, St

'取得一个20十六制字串
Get #1, DPBo + 16, s20

'替换加密部份机码
For i = CMGs To DPBo Step 2
Put #1, i, St
Next

'加入不配对符号
If (DPBo - CMGs) Mod 2 0 Then
Put #1, DPBo + 1, s20
End If
MsgBox "文件解密成功......", 32, "提示"
Else
Dim MMs As String * 5
MMs = "DPB="""
Put #1, CMGs, MMs
MsgBox "对文件特殊加密成功......", 32, "提示"
End If
Close #1
End Function

你说的是这种情况么，很简单，打开工作表后，在工作表的名称下单击右键，

撤销工作表保护即可，

excel密码保护破解方法一：

小编这个Excel“客户销售明细表”文件，包含8张Excel工作表，其中第七张（sheet7）是“宁夏店”的销售数据。从图中，可以看到这个工作表是有密码的，单击“撤销工作表保护”，要求我们输入密码，可是密码忘记了，下面小编就一步一步档例带大家破解他。

1、修改EXCEL文件扩展名

将原始文件：客户销售明细表.xlsx修改为客户销售明细表.zip,这时会变成解压缩格式；

2、从zip中复制密保工作表文件

打开压缩后的文件，并在xl\worksheets中找到有密码保护的文件（本例中为sheet7.xml），拖拽复制该文件到文件夹下面。

3、用记事本打开sheet7.xml文件

打开之后，并找到下面这段代码，将其删除。

保存，并关闭sheet7.xml文件。

4、把改好的sheet7.xml文件复制到zip压缩包中替换；

www.winwin7.com Wint7系统之家 整理

将删除了sheetProduction代码的sheet7.xml文件复制替换回压缩包里面。

5、将ZIP文件改回为XLSX文件，再打开excel文件，可以看到工作表保护密码已经被强制破解删除了。

总结：Excel工作表保护密码是一种很弱的保护，使用本文的方法，就可以破解撤销工作表保护密码。

excel密码保护破解方法二：

1、快捷键A1t F11打开vbe编辑器→插入菜单



2、选择插入模块winwin7.com

3、把下面的代码复制过去→然后把光标点到代码里→F5运行一下→工作表保护就破解了。

Sub 破解工作表密码()

   For x = 1 To Sheets.Count

   Sheets(x).Protect AllowFiltering:=True

   Sheets(x).Unprotect

   Next x

End Sub

实在不行就采用笨办法：先用只读方式打开表格，然后全选复制，再新建表格粘贴。

Excel表格被设置了密码保护，无法更改，必须要在里面就是填入正确的密码才能打开的。

上文件破解它。

---

海沧区13258727860： EXCEL表格被写入保护密码解不开怎么办 - ？
解宝定喘： 如果CTRL+A用不了,那么就是单元格保护里面限制了选择. 可以用VBA来强行选择复制: 一、按ALT+F11 打开VB编辑器 二、双击左边靠上的【工程资源管理器】中的【Microsoft Excel 对象】中的ThisWorkbook(如果找不到【工程资源管理...

海沧区13258727860： EXCEL表格设置了密码,后来忘记密码了,要怎么样才能打开 - ？
解宝定喘： 消除工作表的保护查看是不是有被隐藏的工作表,若菜单中有“格式→工作表→取消隐藏”项,则可通过此项取消隐藏的工作表.如果在菜单中也没有有效的“取消隐藏”项,依然可能有被隐藏的工作表,这时候我们可以任选1工作表右击,在...

海沧区13258727860： 我有个excel表格被密码锁住无法打开,求高手帮忙解密!在线等 - ？
解宝定喘： 如果是打开密码要用软件 ,如果是修改保护密码可用宏解决,宏代码在我的空间有.当然用软件更好这样能找回原密码,可以发给我帮你wdagxy@sina.com

海沧区13258727860： 如何解除Microsoft Excel的密码保护 - ？
解宝定喘： 1. 打开受密码保护的工作表2. 工具---宏----录制新宏---输入名字如:hh3. 停止录制(这样得到一个空宏)4. 工具---宏----宏,选hh,点编辑按钮5. 删除窗口中的所有字符并替换 6. 关闭编辑窗口 7. 工具---宏-----运行,,等1分钟,再确定.OK,没有密码了

海沧区13258727860： excel表格设置密码后无法打开文件? - ？
解宝定喘： 卸载EXCEL然后重新安装看看. 不行就用passware kit工具包解密,应该能打开了. IT内部供应团队为您服务,希望您满意..

海沧区13258727860： Excel表格被密码保护了,怎么取消密码保护啊? - ？
解宝定喘： 如果你知道密码的话,可以在 工具菜单下的保护选项里输入密码取消.如果不知道密码的话,可以新建一个新表,然后将被密码保护的表格数据复制到新表里进行操作.即可不用破解密码.当然要是将新表另存为一个与原文件同名的文件覆盖原文件,原文件将不再有密码.

海沧区13258727860： excel数据表设了密码,但是密码忘记了,怎么打开数据?？
解宝定喘： 破解密码,一般人都会想到用软件来破解,而我们今天是用VBA来进行破解.首先打开VBA编辑器. 1、点击工具->宏->Visual Basic编辑器,打开VBA的编辑器. 2、在Visual Basic编辑器中,点击插入->模块,插入一个新的模块,我们的代码就是写到这个新的模块中的. 3、将下面的代码复制到模块中,不需改动任何代码.

海沧区13258727860： EXCEL文件被设了密码保护,可以打开,但是编辑不了,没有密码打开编辑,我试过各种方法都没办法解除工作溥保护 - ？
解宝定喘： 那就没有办法来解开了,因为这是设置了密码.你不能打开的原因是你设置了两种密码.一是:文件打开的密码.二是:文件编辑的密码.没有办法打开!

海沧区13258727860： Excel 表格被写入密码保护 怎么破解 - ？
解宝定喘： 操作的方法如下: 1、打开受密码保护的工作表. 2、工具---宏----录制新宏---输入名字如:hh. 3、停止录制(这样得到一个空宏). 4、工具---宏----宏,选hh,点编辑按钮 5、删除窗口中的所有字符,替换为下面的内容: Option Explicit ...

海沧区13258727860： 电脑在打开Excel表格时,总是有这样的提示“startup.xls“有密码保护,但实际上我并没有设置密码？
解宝定喘： 可能是你的EXCEL中有宏代码,且里面有加密的语名. 且密码是空白的. 你打开后,按ALT+F11,视图,工程资源管理器,点右面的THISWORKBOOK 看里面是否有代码,如果将其删除