打开工作簿上的VBA退出代码?

时间:2017-09-14 08:09:53

标签: excel vba excel-vba

这是代码的一部分

Dim lx_objectExcel As New Excel.Application
Dim lx_wrkBkSrc As Workbook
Dim lx_wrkShSrc  as WorkSheet

'Using lx_objectExcel.Workbooks.Open WORKS but not Workbooks.Open     
'lx_objectExcel.Workbooks.Open(Filename:=lv_path, ReadOnly:=True) 
Set lx_wrkBkSrc  = Workbooks.Open(Filename:=lv_path, ReadOnly:=True)

使用新实例

lx_objectExcel.Workbooks.Open(Filename:=lv_shrPath, ReadOnly:=True) 

但是使用

Workbooks.Open(Filename:=lv_shrPath, ReadOnly:=True)

代码在打开文件后退出。虽然debuggig也没有进入下一行;虽然搜索somone已提到使用“Thisworkbook.Activate”,但代码甚至不进入下一行。 该文件的类型为“.xlsm” 打开时也不按Shift。我还将application.enableevents设置为false以防止任何宏运行。

p.s之前我问过这个问题,但由于我的质疑不好,没有合适的答案

0 个答案:

没有答案