|
Dim PlotConfigurations As AcadPlotConfigurations
Dim plotCon As AcadPlotConfiguration, Dy$
Set PlotConfigurations = acaddoc.PlotConfigurations
Set plotCon = PlotConfigurations.Add("55", True)
’以下对plotcon的各项属性进行设置
With plotCon
.ConfigName = 默认打印机名
.CanonicalMediaName = "A3"
.PaperUnits = acMillimeters
.StyleSheet = "acad.ctb"
.CenterPlot = True
.PlotRotation = ac90degrees
.StandardScale = acScaleToFit
.PlotType = acExtents
.PlotWithPlotStyles = True
End With
‘这里设置plotcon完成以后,如何把plotcon设置为默认的页面设置?????
我一直找不到设置的方法,这样打印图纸的时候要手动在《页面设置名》中选择才可以!
请高手指教一下! |
|