Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to print plus list options?
Hi,
I've used the following code in a worksheet to bring up a printer dialog box: Sub PrintGraphs() ActiveSheet.PageSetup.PrintArea = "$1:$79" ActiveSheet.PageSetup.PaperSize = xlPaperA3 Dim ActPrinter As String Dim Answer As Boolean With Application ActPrinter = .ActivePrinter Answer = .Dialogs(xlDialogPrinterSetup).Show End With If Answer = False Then Exit Sub Else ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True End If Application.ActivePrinter = ActPrinter Is there any way to add the ability to show print options after selecting a printer, such as paper size, portrait/landscape or number of copies? Many thanks! Marc |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
write a macro to print to search a list and print certain workshee | Excel Programming | |||
Print macro to bring up print options | Excel Programming | |||
Print macro to bring up print options | Excel Programming | |||
What are the options in the print macro? | Excel Programming | |||
filter: how to print filter list options in dropdown box | Excel Discussion (Misc queries) |