[原创]请AUTOCAD VBA高手进来看看！！

zhubin841127 · 发表于 2007-5-11 21:56:00

我现在正在做一个软件包！要求用 VBA绘制应力弧垂曲线！现已经把EXCEL数据给我,要求开发的程序引用EXCEL后，运行程序能够获得曲线！我大致编了程序，界面已做好，运行后提示说用户定义类型未定义，我刚学了半个多月，实在不指导怎么处理！希望好手帮帮忙！一起探讨！我的QQ号码是323208679，能帮忙的请联系我,我将把程序包括数据一起共享，来探讨,也请助我一力！
加我好友时请注明身份！谢谢！

StartMe · 发表于 2007-5-11 22:31:00

你引用CAD相应版本的类型库了么？还是Excel的类型库？
是哪句出的问题？写出来。

StartMe · 发表于 2007-5-11 22:57:00

看了你下面的贴，你没有引用Excel的类型库，
点击：工程－引用，如果你机器已安装Excel，那么会有Microsoft Excel x.0 Object Library的项，其中x跟你安装的Excel版本有关，选上这项就行了。

zhubin841127 · 发表于 2007-5-11 23:24:00

我选择了啊！确定后还是不能实现！

zhubin841127 · 发表于 2007-5-11 23:31:00

我后来重新用同样的方法做了一个界面！再代码窗口输入同样的代码！运行都他提示说用户定义类型未定义义！！出现阴影的地方还是如下中的xlsApp As Excel.Application，只是不想上次那样说是不存在工程或库了！我茫然了！
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 '应力及