Bryco 发表于 2008-3-24 18:06:00

从模板新建

好的,我看了看,看不出来;我什么也找不到,就这样 有人知道如何从Acad调用此例程并传递模板名称吗
[代码我试过这个Public Sub qnewdwg()
makenewdwg "coversheet"
End Sub whcih确实有效,但我不想制作5个sub,其中唯一不同的是模板名称 我希望能找到一种方式来打电话;makenewdwg“;直接传递论点 我希望这有意义

Jeff_M 发表于 2008-3-24 20:15:46

我从来都不知道如何直接从菜单上完成这项工作,我认为这与您正在做的事情类似;因此,5个子系统don#039;不要花太长时间。我有100#039;所以我写了一个sub来写所有的sub。

Bryco 发表于 2008-3-24 21:28:07

这可以从命令行执行,也可以在菜单中执行:
(command "vbastmt" "makenewdwg \"acad\"")
用模板名称替换acad。

Jeff_M 发表于 2008-3-25 09:50:55

干得好,杰夫
那是什么语言?

T.Willey 发表于 2008-3-25 10:20:53


039;s LSP中加入少量VBA&nbsp VBASTMT-VBA语句

Bryco 发表于 2008-3-25 11:35:13

非常好 我试图使用vbastmt,但不断出现语法错误,无法#039;我不知道该怎么做 “the \”;是我的问题,我没有#039;我没有\

T.Willey 发表于 2008-3-25 11:52:09

好的,诀窍是什么 我似乎无法让它工作

Jeff_M 发表于 2008-3-25 12:31:57

关键是模板必须是DWT文件,并且位于指定的模板位置或包含的确切路径中。此外,请确保已加载带有makenewdwg Sub的DVB
当我在没有加载宏的情况下尝试运行它时,我遇到了与您相同的错误

Jeff_M 发表于 2008-3-25 13:39:14

不需要只为这一行生成sub,因为您可以将其作为语句输入
(command "_.vbastmt" "Application.Documents.Add(\"DwtFileName\")")
以上这些对我来说很有效。

Jeff_M 发表于 2008-3-25 16:02:44

...或者,您可以基于PROJECTNAME动态地更改首选项QNEW-template,这就是I'我过去做过。
页: [1] 2
查看完整版本: 从模板新建