我有一个做好的excel的xla程序，现在我需要用vb调用这个xla程序。

Question

可以, 先引用Excel object,
然后调用, 就象打开一个EXCEL文件一样.
看看
http://www.csdn.net/expert/topic/786/786191.xml?temp=.1175806
是关于此类的问题.

Answer 1

好像不行。
Dim objexcel As Object
    Dim objwkbook As Object
    Dim objwksheet As Object
    Set objexcel = CreateObject("Excel.application")
    Set objwkbook = objexcel.workbooks
    'objwkbook.open ("c:\rxreports\xls400rxx.csv")
    objwkbook.open ("c:\program files\microsoft_ office\office\xlstart\report400.xla")
    objexcel.Visible = True
这么写吗？但我打不开excel。

Answer 2

Private xlSheet As Excel.Worksheet
Private xlApp As Excel.Application
Private xlBook As Excel.WorkbookSet xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open("c:\program files\microsoft_ office\office\xlstart\report400.xla")
Set xlSheet = xlBook.Worksheets(1)
xlSheet.Activate
xlApp.Visible = False

Answer 3

不行呀，没反应，根本不调excel.我认为xla不是一个workbook,所以不能用workbook这个对象，而且xlApp.Visible = False，这句是什么意思，把visible设为false，excel不就不可见了么。