1、Printer.Orientation=VbPRORPortrait'纵向打印Printer.Orientation=VbPRORLandscape'横向打印
2、Printer.Orientation=2文档打印以纸的宽边作顶部.
3、将excel工作簿设为横向打印xlsSheet.PageSetup.Orientation=xlLandscape '横向打印xlsSheet.PageSetup.Orientation=xlPortrait '纵向打印
1、Printer.Orientation=VbPRORPortrait'纵向打印Printer.Orientation=VbPRORLandscape'横向打印
2、Printer.Orientation=2文档打印以纸的宽边作顶部.
3、将excel工作簿设为横向打印xlsSheet.PageSetup.Orientation=xlLandscape '横向打印xlsSheet.PageSetup.Orientation=xlPortrait '纵向打印