用VBA绘制问题
大家好。我正在使用vba绘图工具，但有一些问题。
我在设置纸张大小时遇到了问题，经过大量搜索，我找到了编码的“blad”部分，它似乎与纸张样式除外。也许应该是plotstyle？
我的另一个主要问题是，当我运行这个模块时，它需要30秒左右才能打印出来。延迟的原因是什么？我没有循环或数组，所以我不知道为什么需要这么长时间。
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'
页:
[1]