用VB打开EXCEL文件后,用鼠标点击EXCEL文件打不开

来源:百度知道 编辑:UC知道 时间:2024/06/06 02:21:03
当我用下面这段代码打开EXCEL文件后。然后我用鼠标点击test.xls后,这个文件只是闪烁了一下打不开。
Set XlsBook = XlsApp.Workbooks.Open(App.Path & "\test.xls")

我需要的是用我的程序打开EXCEL后,还能用手工操作EXCEL.我的程序只是获取EXCEL文件的信息,不写入。
当然在使用过程中必须开着,不能用下面的代码关闭。
XlsBook.Close
XlsApp.Quit

如何解决?
XlsApp.Workbooks.Open()的参数要如何配置?
我的程序要求打开EXCEL后不显示应用程序
但是在程序运行期间手动打开EXCEL却打不开

excel只能运行一个副本,你的程序已经调用了Excel,且设置为不显示,那么当你手动打开Excel时,他自动连接到已经在内存运行的Excel(而且Visible=false),所以你看一闪而过。这是只能用Getobject函数得到Excel对象,把他设置xlsApp.Visible = True,就可以看到了

在其后Set XlsBook = XlsApp.Workbooks.Open(App.Path & "\test.xls")加上一句:
xlsApp.Visible = True
VBA默认是不显示应用程序的.

你先照1楼的试试看。。

用 readOnly() 模式打开