I will try tomorrow and let you know the outcome thanks for the quick feedback.
On Nov 9, 10:35 am, "Tom Jeffries" <[EMAIL PROTECTED]> wrote: > This may do what you want: > Sub Print_() > Application.ActivePrinter = "HP LaserJet" ' put in printer name > Sheets("Sheet 2").PrintOut Copies:=1 > > Application.ActivePrinter = "Lexmark 615" > Sheets("Sheet 3").PrintOut Copies:=1 > Sheets("Sheet 4").PrintOut Copies:=1 > End Sub > > On Sat, Nov 8, 2008 at 12:08 PM, JD <[EMAIL PROTECTED]> wrote: > > > I would like to print sheet2 to one printer and sheet3 and 4 to a > > different printer. Using a macro how would I go about doing this? Can > > it be done with one macro or do I need to setup different macros. > > Neither of these printers are the default printer on the computer. > > --~--~---------~--~----~------------~-------~--~----~ Visit the blog to download Excel tutorials at http://www.excel-macros.blogspot.com To post to this group, send email to excel-macros@googlegroups.com For more options, visit this group at http://groups.google.com/group/excel-macros?hl=en Visit & Join Our Orkut Community at http://www.orkut.com/Community.aspx?cmm=22913620 Visit the blog to download Excel tutorials at http://www.excel-macros.blogspot.com To Learn VBA Macros Please visit http://www.vbamacros.blogspot.com To see the Daily Excel Tips, Go to: http://exceldailytip.blogspot.com -~----------~----~----~----~------~----~------~--~---