CAD加载VBA时出现编译错误，请各位大神帮忙给看看，万分感谢！

帮助写的很清楚了，跟我excel

VBA开发的项目一样的问题。

把你VBA程序最上面的声明语句改一下就好了，把

Declare

Function

替换成

Declare

ptrsafe

Function

就OK了。32位软件没问题，只有64位软件里的VBA才有这问题。

这个是因为你的OFFICE也是64位的原因造成的，改一下代码就兼容了！

把Private Declare Function加一个PtrSafe变成

Private Declare PtrSafe Function

---