Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
One print job as oposed to several ?
I have (with help) written the following macro.
It essentially prints the first page of every worksheet in a workbook with the exception the "import" and "client details worksheets". My problem is this macro code causes each page to be sent to the printer as a seperate job. This wouldn't be a problem but i'm in a busy office (and though quick) other printouts will sneak in between the pages. Is there any coding variation which would lead to only one job being sent to the printer. Many thanks in anctipation. James Sub PrintFullAccounts() Dim theSheet As Worksheet For Each theSheet In ActiveWorkbook.Worksheets If theSheet.Name = "import" Or theSheet.Name = "client details" Then 'do nothing Else 'print first page theSheet.PrintOut From:=1, To:=1, Copies:=1 End If Next theSheet End Sub |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Print and Print Preview Graphic Moving Resizing 2007/2003 | Excel Discussion (Misc queries) | |||
cell borders that I create dont show on print preview or print | Excel Discussion (Misc queries) | |||
Pivot Table macro to set print area and print details of drill down data | Excel Discussion (Misc queries) | |||
Active cell counting in particular print page (one sheet having different print area) | Excel Worksheet Functions | |||
Need Help w/ Print Macro to Print All Visible Sheets (including Charts) in a Workbook | Excel Programming |