已经用vb控制将excel 文件打开了,如何在另一个过程中使用

qq361161637 发布于 2015-04-20 15:07， 493 次点击

如题:
在过程外写了
Dim Excel As Excel.Application
Dim Workbook As Excel.Workbook
Dim Sheet1 As Excel.Worksheet
Dim sheet2 As Excel.Worksheet
Dim sheet3 As Excel.Worksheet

一个过程中
            Set Excel = CreateObject("excel.application")
            Set Workbook = Excel.Workbooks.Open(App.Path & "\temp.xls")
            Set Sheet1 = Workbook.Sheets("sheet1")
打开了temp.xls  并进行了赋值,如何在另一过程中使用这个对象呢?

再次使用以上语句么？

1 回复

风吹过b2015-04-20 17:33

如果该过程是属于这一个模块（窗体或BAS文件）那就直接使用。确保
Dim Excel As Excel.Application
Dim Workbook As Excel.Workbook
Dim Sheet1 As Excel.Worksheet
Dim sheet2 As Excel.Worksheet
Dim sheet3 As Excel.Worksheet

这些定义是在所有的过程之前。
如果不是在一个模块（窗体或BAS），那么这些定义需要放到 BAS 中定义为全局变量。