[求助]：如何用VBA提取当前图纸空间的名称

gz-yzy

我新建了很多图纸空间并逐一进行了命名，请问如何用VBA提取当前图纸空间的名称将它付给一个变量？

lijiao

纠正一个概念性的的错误：ACAD中只有一个图纸空间，没有很多图纸空间；但是可以有多个布局。
概念清楚了，问题就迎刃而解了。

gz-yzy

谢谢你的提示，
但如果是布局如何提取它们的名称了？

lijiao

最初由 gz-yzy 发布
[B]谢谢你的提示，
但如果是布局如何提取它们的名称了？ [/B]

2. 
   
3.   [FONT=courier new]
   
4. Public Sub Test()
   
5. Dim MyLout As AcadLayout
   
6. For Each MyLout In ThisDrawing.Layouts
   
7.    MsgBox MyLout.Name
   
8. Next MyLout
   
9. End Sub
   
10.   [/FONT]
    

<br />   [FONT=courier new]<br /> Public Sub Test()<br /> Dim MyLout As AcadLayout<br /> For Each MyLout In ThisDrawing.Layouts<br />    MsgBox MyLout.Name<br /> Next MyLout<br /> End Sub<br />   [/FONT]<br />

希望今后要多看帮助，里面有许多例子。