如何添加/更改布局选项卡和属性。有教程吗？

Bryco · 发表于 2006-11-3 11:40:29

有没有人知道一个在线的VBA分步教程，介绍如何在此视口中从模型空间创建图纸空间布局选项卡、布局模板、视口和几何体选择，以及如何使那里的线型比例与模型空间中的相同？到现在为止，我已经知道了如何进行与模型空间相关的编程，但纸质空间仍然为我提供了许多谜团/痛苦
欢迎提出任何（建设性）建议！

Bryco · 发表于 2006-11-3 14:18:21

ThisDrawing.Layouts。添加；布局名称“
ThisDrawing.PaperSpace。AddPViewport中心、宽度、高度psltscale=1

Bryco · 发表于 2006-11-3 14:18:58

这应该让你开始了&nbsp；希望有帮助

Bryco · 发表于 2006-11-3 17:29:05

就这些吗？因此&#039；这就是为什么没有人费心在别处提及它……谢谢
好的，同时我已经开始了：

copy

Public Sub AddMyLayout()
On Error Resume Next 'convenient at least while testing
'add the layout
ThisDrawing.Layouts.Add "MyLayout"
'remove the default tabs
ThisDrawing.Layouts.Item("Layout1").Delete
ThisDrawing.Layouts.Item("Layout2").Delete
On Error GoTo 0

现在，我想用第三方图形中的几何图形填充我的布局，存储为C:\MyAppPath\StdSheets.DWG。此图形有多个布局选项卡。其中一个是；A4Portrait“&nbsp；包含图纸的块参照，名为；A4P页；，一个用于标题栏文本字符串，名为；A4Ptext“；以及用于显示（部分）模型空间的视口#039；s几何形状
如何使这些A4布局元素显示在MyLayout中？

如何添加/更改布局选项卡和属性。有教程吗？

发表回复

精选推荐