在制作ActiveX控件 或者ActiveX dll 时候调用excel 出现错误
在vb中制作ActiveX 控件,已经在引用中选上了Microsoft Excel 9.0 Object Library
程序代码是这样的
Private Sub Command1_Click()
Dim Xls As New Excel.Application '定义一个Excel 对象
Dim NewBook As Excel.Workbook '定义一个Excel工作本
Set NewBook = Xls.Workbooks.Add
With Xls
.Cells(1, 1) = "姓名"
.Cells(1, 2) = "电话号码"
.Cells(1, 3) = "地址"
.Cells(1, 4) = "费用"
.Range("A1:D1").Interior.ColorIndex = 6 '选择标题栏的内部,设置标题栏背景是黄色,这样醒目一点
.Range("A2").Activate '激活A2区域,这一行是关键,激活的必须是标题栏下一行的,而不是标题栏行的。
.Visible = True
End With
End Sub
运行的时候出现错误 提示为:
用户定义类型未定义:Dim Xls As New Excel.Application
怎么解决?
问题点数:20、回复次数:1Top
1 楼Chaizhe(小河)回复于 2005-05-15 10:30:25 得分 20
加上 adoTop




