you can specify the range to print using
ActiveSheet.PageSetup.PrintArea
search this forum or google for examples.
Good luck