Set objexcelbook=objExcelApp.workbooks.Open("E:\database\test.xls")
如果我的excel是加密的，密码是123的话，请问该怎么编写，谢谢！
问题补充：
太谢谢了！成功了，奇怪的是我也曾经这么试过，可能是格式写错了吧，总之太感谢了！！
最佳答案
EXCEL VBA帮助是这么写的：
应用于 Workbooks 对象的 Open 方法。
打开一个工作簿。
expression.Open(FileName, UpdateLinks, ReadOnly, Format, Password, WriteResPassword, IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify, Converter, AddToMru, Local, CorruptLoad, OpenConflictDocument)
－－－－－－－－－－－－－－－－－－－－－－－－－－－
因此有：
Dim oExcel,oWB
Set oExcel= CreateObject("Excel.Application")
Set oWB = oExcel.WorkBooks.Open("E:\database\TEST.XLS",,,,"123")
'#注意是4个逗号
提问者对于答案的评价：
呵呵，太谢谢了
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc275156.html
微信扫一扫 
支付宝扫一扫 