启动Excel应用程序并新建工作簿

        在Access中，可以通过应用“Microsoft Excel 14.0 Object Library”支持库，实现在Access中灵活地操作Excel,涉及Excel的代码一般都需要使用该支持库的才能够运行。

本例介绍使用New 关键字和Add 方法启动Excel。

        本例需要使用New 关键字打开Excel应用程序，并新建一个空白的工作簿。

 示例图：

源码：

 '启动Excel

Private Sub cmd_启动_Click()

   '在定义变量时使用New关键字新建Excel应用程序

    Dim xlApp As New Excel.Application

    Dim xlWbk As Excel.Workbook

    '在Excel应用程序中新增工作簿

    Set xlWbk = xlApp.Workbooks.Add

    '设置Excel应用程序可视状态为True

    xlApp.Visible = True

End Sub