请教复制页面设置的LISP代码，VBA也可以

清风明月10 · 发表于 2013-10-22 19:34:12

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

请教，我在A.DWG中有几个布局的页面设置，我想用LISP代码将它复制到B中来，怎么写？VBA也可以

清风明月10 · 发表于 2013-10-22 19:45:08

本帖最后由清风明月10 于 2013-10-22 19:47 编辑

请点击此处下载

查看状态：需购买或无权限

您的用户组是：游客

文件名称:DXM的页面设置.zip
下载次数:6 文件大小:13.72 KB
下载权限: 不限以上 [免费赚D豆]

请点击此处下载

查看状态：需购买或无权限

您的用户组是：游客

文件名称:DXM的页面设置.zip
下载次数:6 文件大小:13.72 KB
下载权限: 不限以上 [免费赚D豆]

就是这些页面设置。我有一些导入的方法，但不知道如何指定某个页面设置是当前的页面设置？还有就是模型和布局中有同名的页面设置如何区分开来呢、

newer · 发表于 2013-10-22 19:40:18

都是些什么设置呢，举几个例子吧。

清风明月10 · 发表于 2013-10-22 19:48:52

这是我原有的一些代码
(DEFUN C:将DXM的页面设置模板中的所有页面设置导入当前文档中()
;;;来源：2楼页面设置_pagesetup调用-AutoLISP/Visual LISP 编程技术-CAD论坛-明经CAD社区-打印,command,cad2010,对话框 - Powered by Discuz!
;;;http://bbs.mjtd.com/forum.php?mod=viewthread&tid=94195
  (setq expert (getvar "EXPERT"))
  (setvar "EXPERT" 2)
  (command "._-PSETUPIN"
         "D:\\00邓细木CAD插件汇总\\CAD每天使用的图形样板文件（尾缀dwt）Template文件夹\\DXM的页面设置.dwt"
         "*"
  )
  (setvar "expert" expert)
)

st788796 · 发表于 2013-10-22 23:41:57

清风明月10 发表于 2013-10-22 19:48
这是我原有的一些代码
(DEFUN C:将DXM的页面设置模板中的所有页面设置导入当前文档中()
;;;来源：2楼页 ...

拷贝过来要一对一吧，一个布局不可能两个页面设置，同样，你也不能把两个页面同时给一个布局
要有一个宿主才行

清风明月10 · 发表于 2013-10-23 08:31:15

我已经解决了，写了一大堆代码

qq1254582201 · 发表于 2016-8-24 00:01:32

清风明月10 发表于 2013-10-23 08:31
我已经解决了，写了一大堆代码

请问楼主是怎么解决的呢？

账号		自动登录	找回密码
密码			立即注册

[求助] 请教复制页面设置的LISP代码，VBA也可以

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

点评

点评