0

不确定有多少人知道支持 .Net 框架的WinWrap Basic 语言。但这就是我的问题所在。希望有人知道那里的语言。

我正在使用它与 Excel 2010 进行通信。基本上，我正在提取专有数据格式的数据并将其输出到 Excel。当脚本运行期间没有其他 Microsoft Excel 2010 实例处于活动状态时，以下内容将完美执行。

xExcel = CreateObject("Excel.Application") 
xBook = xExcel.Workbooks.Open(XLFilePath) 
xSheet = xBook.Worksheets(“Sheet1”) 
xExcel.Visible = False 
xSheet.Cells(1,1).Value = "Study Name"

但是，如果用户在以下脚本运行期间手动激活了其他 Excel 2010 实例，则会出现脚本错误。

xExcel = CreateObject("Excel.Application") 
xBook = xExcel.Workbooks.Open(XLFilePath) 
xSheet = xBook.Worksheets(“Sheet1”) 
xExcel.Visible = False     
Do 
  xSheet.Cells(1,1).Value = "Study Name" 
Loop

WinWrap 的人说 WinWrap 中的 CreateObject() 是一个调用 CoCreateInstance API 的简单代码。我有点迷路了。有人可以帮助我了解如何创建多个 Excel 实例。

编辑我得到Runtime 50290 Application Specific Error。

4

1 回答 1

0

你试过GetObject吗？

Dim objExcel As Object
 On Error Resume Next
 Set objExcel = GetObject(, "Excel.Application")
With objExcel
    'do something
End With
于 2015-04-10T18:20:06.943 回答