将布局名称作为前缀添加到
是否有LISP将布局名称（第一个）添加到图形文件名（如前缀）？图纸文件名为1楼平面图
第一个布局名称为A部分
因此，运行lisp图形文件名将成为A-1层平面图的一部分（用“-”分隔）
要画几百幅画。 一种方法可能是：
(defun C:test ( / )
(vla-SaveAs
(vla-get-ActiveDocument (vlax-get-acad-object))
(strcat (car (layoutlist)) "-" (getvar 'dwgname))
)
(princ)
)(vl-load-com) (princ)
你好，Grrr先生。首先我想说声谢谢。
它在文档文件夹中制作以布局名称作为前缀的文件副本。
这可以在不打开每个单独文件的情况下完成吗？因为我有将近几百个文件。谢谢 您需要以脚本的形式执行此操作，该脚本可以打开每个dwg并找到布局名称。
; save the lisp as say layoutdwg.lsp
open dwg1 (load "layoutdwg") close
open dwg2 (load "layoutdwg") close
; save the lisp as say layoutdwg.lsp
(vl-load-com)
(vla-SaveAs
(vla-get-ActiveDocument (vlax-get-acad-object))
(strcat (car (layoutlist)) "-" (getvar 'dwgname))
)
(princ)
最后，有多种制作脚本文件的方法，请访问www.lee-mac。他有一个。 从来没有这样的事情，所以我只是分享我的想法：
我记得有一个类似请求的线程，我在那里回复了链接。
我认为这些选项要么使用LM的ObjectDBX包装器，要么使用比格尔提到的LM的编剧。
另一种方法是打开N个图形，并遍历文档集合。（请记住，有一个线程与此类似的任务-但似乎无法找到它）。 例如，如果用户重新定位了第一个布局，则功能布局列表的第一个选项卡不会对选项卡重新排序。
谢谢比格尔先生的建议。我想这意味着我需要复制数百个文件名来创建这个脚本。不是为了减少它，但我确实需要一些可以在短时间内完成的事情。 我会试用这个链接。谢谢ALo如果你还记得N dwg方法，一定要告诉我。谢谢
根据图形设置，第一个布局名称将始终是一个。
看一看：
页:
[1]
2