WPS工作表格设密码保护清除方法

一.清除XLSX工作表密码方法:

注:本文所述技巧对.xlsx格式的表格文件有效

  1. 打开资源管理器,点击“查看”-“显示/隐藏”,勾选“文件扩展名”显示;
  2. 右击要处理的表格文件,选择“重命名”,将文件扩展名修改为“.zip”。接着,在弹出的安全提示中点击“是”;(以“翻译Updated COMM-SC-2000-08.zip”压缩文件夹进行测试,下图为例。)
  3. 打开压缩文件,双击“xl”→“worksheets”,这里会默认显示出当前工作簿所包含的所有工作表;双击自己要破解的那个表名,文件类型对话框选择“记事本”。                                                找到已加密的“sheet1.xml”文件
  4. 按下 Ctrl+F键调出查找对话框,输入“Protection”,将搜索到的“Protection”行全部删除(以“<>”为界限),按下 Ctrl+S键保存。                                            删除“Protection”语句所在整组行内容
  5. 在压缩软件对话框中点击“是”,将修改更新回压缩包;
  6. 关闭压缩软件,将文件扩展名改回原来的“.xlsx”,再次打开文件时,工作表密码就已经被清除了。

二.清除XLSX工作簿密码方法:

  1. 打开工作簿;
  2. 按下键盘的“Alt”键+F11键,进入Microsoft visual basic编辑器;
  3. 点击“插入”→“模块”;
  4. 输入以下代码,点击运行;
  5. 运行完回到刚才的表格,即可正常编辑,需将关掉工作表格保护,WPS界面:点击“审阅”,再点击“撤销工作表保护”,保存。

以下命令为清除密码代码(参考)

1,工作簿密码清除代码

Sub 工作簿密码破解()

ActiveWorkbook.Sheets.Copy

    For Each sh In ActiveWorkbook.Sheets

        sh.Visible = True

    Next

End Sub

2,工作表清除代码

Sub密码破解()

Dim pj As Worksheet

    For Each pj In Worksheets

        pj.Protect AllowFiltering:=True

        pj.Unprotect

    Next

End Sub

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值