有人知道如何从另一个绘图中获取页面设置到当前布局中吗?
在ACAD,它是Psetupin我正试图通过代码做到这一点。
看起来我需要的方法是CopyFrom,但是我在设置配置时收到一个找不到键的错误。
一旦获得,我将把nec布局设置为相应的页面设置(plotconfig)
有什么想法吗?
谢谢!标记
- Sub Psetupsin()
- Dim PltConfig as PlotConfiguration
- Set KPltConfigs = ThisDrawing.PlotConfigurations.Item ("I:\Path\Path\Path\Filename-CTB.dwt\K-22x34")
- Set HPltConfigs = ThisDrawing.PlotConfigurations.Item ("I:\Path\Path\Path\Filename-CTB.dwt\H-22x34")
- For Each PltConfig In ThisDrawing.PlotConfigurations
- If PltConfig.Name = "K-22x34" Then
- Debug.Print "K"
- Else
- PltConfig.CopyFrom KPltConfigs
- End If
- If PltConfig.Name = "H-22x34" Then
- Debug.Print "H"
- Else
- PltConfig.CopyFrom HPltConfigs
- End If
- Next
- End Sub
本帖以下内容被隐藏保护;需要你回复后,才能看到! 游客,如果您要查看本帖隐藏内容请 回复 |