从Windows任务管理器
运行以下代码。
Process.Start("Excel.exe", "/embedded ""C:\Book1.xlsx""")
Threading.Thread.Sleep(5000)
Dim xlApp As Excel.Application = Nothing
xlApp = CType(GetObject("Excel.Application"), Excel.Application)
请参阅以下错误。
Cannot create ActiveX component
有什么想法吗?
支持的链接:
答案 0 :(得分:0)
您对VB GetObject Method的使用不正确 方法签名是:
Public Function GetObject( _
Optional ByVal PathName As String = Nothing, _
Optional ByVal [Class] As String = Nothing _
) As Object
您正在传递一个类名(" Excel.Application")作为路径参数。
xlApp = CType(GetObject("Excel.Application"), Excel.Application)
应该是
xlApp = CType(GetObject(Nothing,"Excel.Application"), Excel.Application)