TroutKing 发表于 2022-7-6 22:30:42

试图完成我的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]
查看完整版本: 试图完成我的VBA页面