flyboy79

最近做报表的时候发现单位数据库生成的EXCEL表格被密码保护了，要修改里面内容必须输入密码，但是因为格式问题所以，必须要对表格进行修改。于是就研究了如何来突破密码保护，从而获得修改EXCEL表格内容的权限。
具体方法如下：
1、打开被保护的EXCEL表格，新建一个宏。
2、在宏编辑窗口下输入以下代码：
Sub EXECELPASSWORD()
x    ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _
        False, AllowFiltering:=True, AllowUsingPivotTables:=True
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:= _
        False, AllowFiltering:=True, AllowUsingPivotTables:=True
    ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _
        True, AllowFiltering:=True, AllowUsingPivotTables:=True
    ActiveSheet.Unprotect
    ANS = MsgBox("密码OK", 48, "by flyboy")
End Sub
3、保存宏，并运行
经过测试，该方法有效，顺利了突破了EXCEL设置的密码，对表格进行了修改。
在这里，我把这个方法分享出来，希望能给和我遇到一样困难的朋友以帮助。

[ 本帖最后由 flyboy79 于 2011-1-26 21:30 编辑 ]

flyboy79

把代码COPY进宏就OK了啊，比下载软件方便多了啊。