Public Sub Plot_11x17（）Dim PntrName As StringDim CTBhalf As StringDim blad As acadlayioutptrname=UserForm1。PntrName。值ctbhalf=UserForm1。CTBhalf。Value'Set ValuesSet blad=此图形。布局。项目（布局1）本图纸。ActiveLayout=叶片。ConfigName=PntrNameblad。CanonicalMediaName=“11x17”blad。PlotType=acExtentsblad。中心图=Trueblad。StandardScale=acScaleToFitblad。ScaleLineweights=假叶片。样式表=CTBhalf'
置顶卡
