帮助：AutoCad 200的VBA代码

mfab03 · 发表于 2022-7-6 14:43:53

您好，我对在AutoCad 2008中使用VBA代码相当陌生，我想知道是否有人可以帮助我。

我的代码的目的是单击两个对象，识别我选择的对象，然后遍历逻辑，根据我选择的两个对象打开正确的现有文档。

我的问题是，当我打开第二个文档时，我想将该图形中的对象复制到我打开的第一个图形中。但是，我无法将实体从一个打开的图形复制到另一个。

我试过了。复制和。copyobject，但我不知道我做得是否正确。（如果我买了一本关于VBA for autocad的书可能会有所帮助，如果有人知道我在哪里可以找到一本好书，那么这些建议也会很有帮助！）

谢谢

mfab03 · 发表于 2022-7-6 15:43:27

我想让问题尽可能简单。。。

如果有两个打开的图形，如何使用VBA for AutoCad 2008将对象从一个图形复制到另一个图形？

看起来它应该非常简单，但我找不到任何适合它的东西。

borgunit · 发表于 2022-7-6 15:45:42

帮助文件中的CopyObjects方法[ActiveX和VBA参考：AAR]。。

RetVal=对象。CopyObjects（对象[，所有者][，IDPAIR]）
对象
数据库，文档
此方法应用于的一个或多个对象。
物体
变体（对象数组）；仅输入
要复制的主要对象的数组。所有对象必须具有相同的所有者，并且所有者必须属于调用此方法的数据库或文档。
物主
变体（单个对象）；仅输入；可选择的
复制对象的新所有者。如果未指定所有者，则将使用与对象数组中的对象相同的所有者创建对象。
IDPAIR公司
变体（IDPair对象阵列）；输入-输出；可选择的
复制和翻译过程中发生的信息。
输入：空变量。
输出：IDPair对象阵列。
RetVal公司
变体（对象数组）
新创建的重复对象数组。此数组中仅返回主对象。有关CopyObjects操作期间发生的情况的更多信息，或也被复制的主要对象所拥有的对象的列表，请参阅IDPairs数组。
评论
要将对象复制到另一个打开的图形，请将“所有者”参数设置为另一个图形的模型空间。

[编程交流] 帮助：AutoCad 200的VBA代码

发表回复

精选推荐