共6 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：excel文件解密
1楼
zhenghangbo 发表于：2024/1/30 12:44:00桌面有一个abc.xls，加密的密码为：123zhb
Dim App As New MSExcel.Application
Dim doc As MSExcel.Workbook = App.WorkBooks.Open("C:\Users\lenovo\Desktop\abc.xls")
App.Visible = True
doc.Unprotect(Password:="123zhb")
上述打开的abc.xls任然需要手工输入密码，怎么才能解密打开这个excel文件？
2楼
有点蓝 发表于：2024/1/30 13:32:00……
doc.Unprotect(Password:="123zhb")
App.Visible = True
3楼
zhenghangbo 发表于：2024/1/30 14:36:00按照你代码，还是没有效果，打开后要手动输入密码。是不是因为excel是wps建的原因
4楼
有点蓝 发表于：2024/1/30 14:52:00文件发上来测试一下
5楼
zhenghangbo 发表于：2024/1/30 16:27:00| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:abc.xls |
6楼
有点蓝 发表于：2024/1/30 16:55:00 Dim doc As MSExcel.Workbook = App.WorkBooks.Open(ProjectPath & "abc.xls", password:="123zhb")
共6 条记录, 每页显示 10 条, 页签:
[1]