1、点击顶部菜单“开发工具”下的录制新宏图标。
3、在页面布局菜单中,将纸张方向设置为纵向。
5、“ActiveSheet.PageSetup.Orientation = xlPortrait”即为纵向纸张方向的VBA宏代码。