我调用excel.application时，程序总是报外部调用错误，是什么原因呀？

Question

程序如下：
Dim app As New excel.application
Dim book As New excel.workbook
Dim sheet As New excel.Worksheet
希望高手指点一下，谢谢

Answer 1

我也有相似的问题,帮我也看看    Dim AppExcel As Excel.Application   '定义Excel程序对象
    Dim BookExcel As Excel.Workbook     'Excel文件对象
    Dim sheetexcel As Excel.Worksheet   '工作表对象
    Set AppExcel = New Excel.Application                '创建excel对象
    Set BookExcel = New Excel.Workbook
    Set sheetexcel = New Excel.Worksheet    Set BookExcel = AppExcel.Workbooks.Add              '添加工作簿
    Set sheetexcel = BookExcel.Worksheets.Add           '添加工作表    AppExcel.Visible = True
    sheetexcel.Cells.CopyFromRecordset rs
    BookExcel.SaveAs (App.Path + "..\Excel\Details.xls")奇怪的是:我已经引用了微软的Excel 9.0 Object Library 了

Answer 2

Dim exl As Object
   Dim mybook As Object
   Dim mysheet As Object
   Set exl = CreateObject("excel.application")
   Set mybook = exl.Workbooks.Add
   Set mysheet = exl.worksheets.Add
  
  这样试试看看行不行