试图完成我的VBA页面
有人能看一下这个并告诉我我的错误在哪里吗?我好像有两个,我就是想不出来。1.在我的“CopyFrom”行中。。。。程序似乎经历了这个过程,但它仍然将我发送到错误控制
2.无论我如何设置打印旋转,当我需要切换到“横向”时,打印预览窗口仍保留“纵向”。
选项ExplicitPublic Sub CreatePageSetup()On Error GoTo GetErr'MsgBox“保持耐心”&vbCr&vbCr&“页面布局设置最多需要30秒”GOGETCANNOCALMEDIANAMESDIM PLAYOUTCONG As ACADLAYONEATE PLAYOUTCONG=ThisDrawing。ActiveLayoutDim MyPlotSize As StringMyPlotSize=“User2314”'
页:
[1]