[求助][VBA]从Excel启动AutoCAD...

Mrqq18 · 发表于 2005-12-8 12:56:00

Dim CAD As .AcadApplication
...
On Error Resume Next
Set CAD = GetObject(, "AutoCAD.AcadApplication.16")
If Err  0 Then
Err.Clear
Set CAD = New AutoCAD.AcadApplication
If Err  0 Then
      MsgBox "无法启动AutoCAD."
      Exit Sub
End If
End If
代码有什么不对吗?可我就是不能成功启动CAD.但可以在系统任务栏中看到ACAD.exe的进程.
而我用createobject时就可以正常启动CAD了.
谢谢高手指教.