从其他程序访问AutoCAD

Keith · 发表于 2007-4-5 07:18:47

大家好，039；我已经成功地将资料从ACAD发送到Excel和Access，现在我&#039；我试图做相反的-即访问ACAD从Excel使用VBA
我已经拼凑了一个似乎有效的例程，但它需要这样一句话：
&nbsp；设置acadApp=GetObject（，“AutoCAD.Application.16”）
我理解所有这些，除了提到；16；。我收集到这是一个版本参考（我使用2006），但是我在哪里可以找到用于其他版本的数字
一如既往，您的评论收到了好评！

同年同月同日生 · 发表于 2007-4-5 08:13:00

注册表。

缘分 · 发表于 2007-4-5 11:15:55

如果你不&#039；不管版本如何，它都会发现当前应用程序已加载

copy

Set acadApp = GetObject(, "AutoCAD.Application")

大天狼星 · 发表于 2007-4-10 12:35:53

如果你想麻烦的版本，一些电台安装了多个Acad版本，你需要使用不同版本的不同代码等…这可能会帮助你，它&35;039；它是为几个应用程序编写的。

陆风哥哥 · 发表于 2007-4-25 06:26:24

谢谢Dnereb，
我想我&#039；我可能需要这样的东西

林峰卓羲 · 发表于 2007-4-26 11:30:07

如Keith所述，如果您需要特定于版本，只需输入如下所示的版本即可

copy

Set ACADApp = GetObject(, "AutoCAD.Application.16.2")

标记

水晶字 · 发表于 2007-5-11 10:23:14

嘿，Rob，如果你需要ACAD的具体版本，回到你原来的问题；您可以使用非常简单的宏，如

copy

Sub Version()
MsgBox Application.Version
End Sub

消息框将为您返回版本标记

从其他程序访问AutoCAD

发表回复

精选推荐