NY2DR
08-02-2006, 09:13 AM
Hello everyone,
Here is my macro
Sheets(Array("10-31-06", "10-31-06-Report")).Select
Sheets("10-31-06").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True:think:
Sheets("SUMMARY").Select
Range("A6").Select
It does what I want it to do except one minor thing.
I would like the dialog print box to appear so that I may select how many copies I want.
This way I don't have to keep pressing the macro button several times.
Thank you.
Here is my macro
Sheets(Array("10-31-06", "10-31-06-Report")).Select
Sheets("10-31-06").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True:think:
Sheets("SUMMARY").Select
Range("A6").Select
It does what I want it to do except one minor thing.
I would like the dialog print box to appear so that I may select how many copies I want.
This way I don't have to keep pressing the macro button several times.
Thank you.