在VB中怎样引用EXCEL?

[winjet]

在VB中怎样引用EXCEL，词句
Dim conn As New ADODB.Connection
Dim xlApp As New Excel.Application
出现自定义错误？

[conrad_wan]

添加project->References->Microsoft Excel xx.0 Object Library试试。

[lifat]

im xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象
Set xlBook = xlApp.Workbooks.Open(App.Path & "\1") '打开已经存在的EXCEL工件簿文件
xlApp.Visible = True '设置EXCEL对象可见（或不可见）
Set xlSheet = xlBook.Worksheets(1) '设置活动工作表
xlSheet.Cells(1, 1) = "零件名称" '给单元格（row,col）赋值
xlSheet.Cells(1, 2) = " 价格"
'xlSheet.PrintOut '打印工作表
'xlBook.Close (True) '关闭工作簿
'xlApp.Quit '结束EXCEL对象
Set xlApp = Nothing '释放xlApp对象
'xlBook.RunAutoMacros (xlAutoOpen) '运行EXCEL启动宏
'xlBook.RunAutoMacros (xlAutoClose) '运行EXCEL关闭宏

注意：要引用Microsoft Excel xx.0 Object Library

[fujihua2001]

通上

[小萝莉和大白兔]

都说明白了我就不多说了的哈。

[奔跑9999]

没有引用Microsoft Excel xx.0 Object Library

[小嘉茗的爸爸]

学习

[winjet]

我在添加引用，怎么也找不到你们所指的Microsoft Excel xx.0 Object Library，要怎么做才能有啊？

[winjet]

或者要装什幺软件才有呢，OFFICES2000装了

[snmy]

可能你安装软件时，少装了控件了吧