You can either use:
ActiveSheet.PageSetup.Orientation = xlLandScape
Or you can specify your own area on the sheet to be the printed by using:
ActiveSheet.PageSetup.PrintArea = "A1:K30"
Hope that helps :)
Last Wiki Answer Submitted: February 22, 2010 10:48 am by Darraca260 pts.
If you live outside the United States, by submitting your email address you consent to having your personal data transferred to and processed in the United States.
I’m fairly certain this can be enacted through printer specific settings.
-Schmidtw