"$$"，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
【如何撤销excel工作表保护密码 Excel怎么撤销工作表保护密码】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
----------------------
复制到横线以上
6、关闭编辑窗口;
7、依次点击菜单栏上的工具---宏-----宏，选AllInternalPasswords，运行，确定两次;
推荐阅读
- 华为浏览器如何截图、截取网页
- excel表如何移动整列 Excel表怎么快速移动整行或整列数据
- excel中的row Excel的ROW函数是什么
- 如何将UG文件保存为PDF格式
- 如何切换svn的登陆账号
- 手机QQ如何压缩文件
- 如何抢支付宝五福红包
- qq情侣空间如何查看谁看过我
- 如何制作电子版报表
- 如何买到靠谱烟油