请教布局间的切换

StartMe · 发表于 2007-1-19 23:15:00

请教如何进行模型空间中的各布局间的切换？
模型空间与图纸空间间的切换倒是可以，但如何切换到指定名称的模型空间？
谢谢指教！

fjfhgdwfn · 发表于 2007-1-21 19:08:00

Dim Layouts As AcadLayouts, Layout As AcadLayout
Set Layouts = ThisDrawing.Layouts
For Each Layout In Layouts

ThisDrawing.SetVariable "CTAB", Layout.Name
...............
next
可以在各个布局中循环。

StartMe · 发表于 2007-1-21 21:15:00

这个改变Layout.name就可以直接切换到指定名称的图纸空间了吧？我需要切换的图纸空间可不一定是邻近的，我明白天试试吧，谢谢！

fjfhgdwfn · 发表于 2007-1-22 09:56:00

ThisDrawing.SetVariable "CTAB", Layout.Name
中的Layout.Name只要是你的布局名就是了.一个字符串.

请教布局间的切换

发表回复

精选推荐