win8中运行vba的一个问题

ugl · 发表于 2014-8-6 13:27:00

系统win8.1,cad2007或2008,运行
Dim AppAcad As Object
Set AppAcad = GetObject(, ".Application")
会提示“429错误，activex无法创建对象”，安装cad2013则无问题，系统换为xp也无问题，请教有无办法解决？

slw7310 · 发表于 2014-11-6 14:46:00

在WIN8.1的管理员账号下编译运行

wmz · 发表于 2014-11-6 17:34:00

Set acadApp = GetObject(, "AutoCAD.Application")
If Err Then
Err.Clear
Set acadApp = CreateObject("AutoCAD.Application")
If Err Then End
End If
这样行不行呢？我没有安装此版本，没有试过。

win8中运行vba的一个问题

发表回复

精选推荐