百思不解，那位大虾救我，有关execl object的，请进！！！

Question

救救我，为什么此时不能创建 excel object ??

Answer 1

在客户机装有Excel的条件下，使用
On Error Resume Next
Dim xlApp as object
Set xlApp = GetObject(, "Excel.Application")
   If Err.Number = 429 Then
      Set xlApp = CreateObject("Excel.Application")
      Err.Clear
   End If
语句创建对象，应该没问题。

Answer 2

to:WhiteEat(阿鬼)　
不行，这样程序直接 Resume Next了。
程序提示的实时错误‘458’，object 使用了vb不支持的自动化对象
错在：Set Excel = CreateObject("Excel.Application") 此句。
好像新装OFFICE 就会由此毛病。怪了，谁帮我

Answer 3

请编过VB调用OFFIE的高手帮忙，救救小弟

Answer 4

我的程序运行很正常。可能你的OFFICE有问题。你可以用早绑定试试。