关于AUTOCAD VBA的菜鸟问题！我是新手，求助！

zhubin841127

我有以下的一段代码 ！但是运行后总是提示说用户类型未定义！我怀疑是不是没有引用好EXCEL，在这想请教引用的方法，刚接触VBA，不太会！下面是我的一部分代码，只求引用EXCEL的方法！

Dim DrawCureType(0 To 2) As Boolean

Dim ii, jj, kk As Integer '循环用变量
Dim xlsApp As Excel.Application
Dim xlsBook As Excel.Workbook
Dim xlsheet As Excel.Worksheet:
Dim AllCount_row As Integer  'Excel表中数据行数
Dim AllCount_column As Integer 'Excel表中数据列数
Dim XX(0 To MAX_row) As Variant  '档距值（XX（0）为文字说明）
Dim YY(0 To MAX_row, 1 To MAX_column) As Variant '应力及弧垂值（YY（0，*）为文字说明）

zhubin841127

当出现未定义提示时，xlsApp As Excel.Application上被阴影覆盖

xinghesnak

你没有引用Excel的函数库把？

zhubin841127

可能是吧！但是我就是不会啊 ！就是来请问怎么引用！

laoliu09

在引用里！

还有，我要说一点就是，你这样的声明是不对的，这样只有kk是Integer。

Dim ii, jj, kk As Integer '循环用变量

应该是这样声明

Dim ii As Integer , jj As Integer , kk As Integer '循环用变量

lytofly

呵呵，都是菜鸟。应该先在VBA的菜单里有，找找吧。。。（呵呵，刚接触CAD VBA没几天，有个印象）