| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Print All Sheets-Select Printer First
Hello, I am using the following code to print all sheets in a workbook, but want the user to select a printer first. Not sure how to accomplish this. Any help is very appreciated! Application.ScreenUpdating = False Sheets(Array("ACCOUNT SUMMARY", "VEHICLES", "DRIVERS", "AUTO LIMITS", "GENERAL LIAB", "QUOTE")).PrintOut , , 1 Sheet1.PrintOut , , 1 Application.ScreenUpdating = True Thanks, Erica |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Print All Sheets-Select Printer First
Application.ScreenUpdating = False Application.Dialogs(xlDialogPrint).Show Sheets(Array("ACCOUNT SUMMARY", "VEHICLES", "DRIVERS", "AUTO LIMITS", "GENERAL LIAB", "QUOTE")).PrintOut , , 1 Sheet1.PrintOut , , 1 Application.ScreenUpdating = True "ehale" wrote in message ... Hello, I am using the following code to print all sheets in a workbook, but want the user to select a printer first. Not sure how to accomplish this. Any help is very appreciated! Application.ScreenUpdating = False Sheets(Array("ACCOUNT SUMMARY", "VEHICLES", "DRIVERS", "AUTO LIMITS", "GENERAL LIAB", "QUOTE")).PrintOut , , 1 Sheet1.PrintOut , , 1 Application.ScreenUpdating = True Thanks, Erica |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Print All Sheets-Select Printer First
Thanks! That worked great -- it lets me select a printer, but for some reason, it prints the sheets more than once. If I comment out that Applications.dialogs . . . it only prints each sheet once. Any ideas how I can resolve that? Thanks again. "JLGWhiz" wrote: Application.ScreenUpdating = False Application.Dialogs(xlDialogPrint).Show Sheets(Array("ACCOUNT SUMMARY", "VEHICLES", "DRIVERS", "AUTO LIMITS", "GENERAL LIAB", "QUOTE")).PrintOut , , 1 Sheet1.PrintOut , , 1 Application.ScreenUpdating = True "ehale" wrote in message ... Hello, I am using the following code to print all sheets in a workbook, but want the user to select a printer first. Not sure how to accomplish this. Any help is very appreciated! Application.ScreenUpdating = False Sheets(Array("ACCOUNT SUMMARY", "VEHICLES", "DRIVERS", "AUTO LIMITS", "GENERAL LIAB", "QUOTE")).PrintOut , , 1 Sheet1.PrintOut , , 1 Application.ScreenUpdating = True Thanks, Erica |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Print All Sheets-Select Printer First
Yep, wrong dialog box. Should have been: Application.Dialogs(xlDialogPrinterSetup).Show "ehale" wrote in message ... Thanks! That worked great -- it lets me select a printer, but for some reason, it prints the sheets more than once. If I comment out that Applications.dialogs . . . it only prints each sheet once. Any ideas how I can resolve that? Thanks again. "JLGWhiz" wrote: Application.ScreenUpdating = False Application.Dialogs(xlDialogPrint).Show Sheets(Array("ACCOUNT SUMMARY", "VEHICLES", "DRIVERS", "AUTO LIMITS", "GENERAL LIAB", "QUOTE")).PrintOut , , 1 Sheet1.PrintOut , , 1 Application.ScreenUpdating = True "ehale" wrote in message ... Hello, I am using the following code to print all sheets in a workbook, but want the user to select a printer first. Not sure how to accomplish this. Any help is very appreciated! Application.ScreenUpdating = False Sheets(Array("ACCOUNT SUMMARY", "VEHICLES", "DRIVERS", "AUTO LIMITS", "GENERAL LIAB", "QUOTE")).PrintOut , , 1 Sheet1.PrintOut , , 1 Application.ScreenUpdating = True Thanks, Erica |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Select Sheets to Print | Excel Programming | |||
| members on my network printer not able to print to default printer | Excel Discussion (Misc queries) | |||
| User select printer in print macro | Excel Programming | |||
| User select printer in print macro | Excel Programming | |||
| create a pause in print macro to allow user to select printer | Excel Programming | |||
Linear Mode
