Printing on more than on printer

B

Bob

I have a spreadsheet on my laptop that I wish to print on
my home computer system that has one printer and at the
office it has anoter type of printer. In this spreadsheet
I use a macro to make it print out 2 of the 3 pages of the
spreadsheet everyday on my computer system at home. my
macro reads:

Sub Printpages()
'
' Printpages Macro
' Macro recorded 4/15/2004 by Bob
'

'
Application.ActivePrinter = "hp officejet 6100 series
on Ne00:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1,
ActivePrinter:= _
"hp officejet 6100 series on Ne00:", Collate:=True
Sheets("Sheet2").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1,
Collate:=True
End Sub
Can I change where I have "HP Officejet 6100",
to "Default"?.
 
F

Frank Kabel

Hi
just delete this line and leave only the
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

statement
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Print to PDF format 4
loop a macro 4
print from macro, using if formula 4
Creating PDF files via 995 1
changing and re-setting the default printer 2
Printing Orientation in Outlook 2003 0
Printing to seperate printer trays................... 1
Print to specific printer -- macro 2

Top