示例在EXCEL2007中进行,可以不使用宏设置,直接按以下方法操作。
1、先打开EXCEL,sheet1是一个被保护的工作表,当点击单元格尝试编辑时。会提示试图更改的单元格或图表在受保护的工作表中!
2、点击工作表左上角全选,按Ctrl+C 复制工作表,然后在右侧新建 一个工作表,再次点击左上角全选,按CTRL+V粘贴,将被保护的工作表粘贴到新的表中,此时的工作表内容与原表相同,只是没有了密码保护。
3、删除原工作表,将新建的工作表名称改为原名称,并移动到原位置即可。
以WPS 2019版本为例:
被加密的文档需要您先具备解密密码,如密码已遗忘,目前官方没有办法帮助找回(编辑密码/打开密码均不可找回),建议您可尝试更换大小写尝试解锁。
如您已找回密码,可参考下方方法解除:
1)开启了账号加密:开启后只有加密者本人的账号或被授权的用户才可以打开,其他人将无权限打开。可参考下图解除加密;
2)设置了密码加密:可参考下图解除密码;
3)「表格(Excel)」取消密码:点击「审阅-撤销工作表/簿保护」
4)「文字(Word」取消密码:点击「审阅-限制编辑-停止保护」
Excel文件加了密码的文件, 推荐使用使用软件 “Office Password
Remover”,这个软件能破解Word、Excel和Access文档密码, 而且速度很快,一般情况下解密过程要要几秒钟就行了.
这个软件可以在网上搜索一上, 有很多破解版的可以下载, 这里就不提供下载了. 安装很容易, 一路Next就行了.
该软件下载并安装后,会直接在桌面形成快捷方式. 这里注意, 最好下载破解版,如果是非破解版的软件,破解后的文件很可能出现部分内容遗失的情况。
使用的方法也很简单,双击软件图标,软件弹出的界面看起来很简单,选中“文件夹”图标中,这时候指定需要破解的文档地址,找到忘记密码的Excel文件,
下面的工作软件会自己完成, 如果存在密码,该软件就会自动破解,速度很快。如果没有密码,会自动显示为None, 表示不用破解。
以WPS 2019版本为例:被加密的文档需要您先具备解密密码,如密码已遗忘,目前官方没有办法帮助找回(编辑密码/打开密码均不可找回),建议您可尝试更换大小写尝试解锁。
如您已找回密码,可参考下方方法解除:1)开启了账号加密:开启后只有加密者本人的账号或被授权的用户才可以打开,其他人将无权限打开。可参考下图解除加密;2)设置了密码加密:可参考下图解除密码;3)「表格(Excel)」取消密码:点击「审阅-撤销工作表/簿保护」4)「文字(Word」取消密码:点击「审阅-限制编辑-停止保护」关注微信公众号「WPS售后服务」获取更多「人工服务、使用技巧、活动福利」。
开放工具--录制宏--马上停止录制--然后点击宏选择刚才录制的宏点击编辑清空里面的内容,复制下面的内容进去,然后运行宏就好了
Private Sub VBAPassword() '你要解保护的Excel文件路径
Filename = Application.GetOpenFilename("Excel文件(*.xls & *.xla & *.xlt),*.xls;*.xla;*.xlt", , "VBA破解")
If Dir(Filename) = "" Then
MsgBox "没找到相关文件,清重新设置。"
Exit Sub
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 Sub
End If
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, "提示"
Close #1
End Sub
以WPS 2019版本为例:被加密的文档需要您先具备解密密码,如密码已遗忘,目前官方没有办法帮助找回(编辑密码/打开密码均不可找回),建议您可尝试更换大小写尝试解锁。
如您已找回密码,可参考下方方法解除:1)开启了账号加密:开启后只有加密者本人的账号或被授权的用户才可以打开,其他人将无权限打开。可参考下图解除加密;2)设置了密码加密:可参考下图解除密码;3)「表格(Excel)」取消密码:点击「审阅-撤销工作表/簿保护」4)「文字(Word」取消密码:点击「审阅-限制编辑-停止保护」关注微信公众号「WPS售后服务」获取更多「人工服务、使用技巧、活动福利」。
以WPS 2019版本为例: 被加密的文档需要您先具备解密密码,如密码已遗忘,目前官方没有办法帮助找回(编辑密码/打开密码均不可找回),建议您可尝试更换大小写尝试解锁。
如您已找回密码,可参考下方方法解除: 1)开启了账号加密:开启后只有加密者本人的账号或被授权的用户才可以打开,其他人将无权限打开。可参考下图解除加密; 2)设置了密码加密:可参考下图解除密码; 3)「表格(Excel)」取消密码:点击「审阅-撤销工作表/簿保护」 4)「文字(Word」取消密码:点击「审阅-限制编辑-停止保护」 。
你好!暂不清楚你所说的wps文件是表格还是word文档。
如果是word文档加密,并且密码忘记的话,可以有两种破解文档的方法:第一种:鼠标放在被加密的word文档上,左键选择打开方式,使用写字板方式打开加密word文档,即可破解。第二种:打开word文档,新建一个空白文档,执然后执行新建文档上面的“插入文件”,随即打开“插入文件”对话框,紧接着打开存放在桌面上需要解除保护的文档,单击插入,将加密保护的文档插入到新文档中,随即文档保护会被自动撤销,即可解密。
本人亲测,方法简单有效。本人纯手打,觉得满意请采纳!谢谢。