| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Print Preview Macro
Hi,
The code above is working fine, but it print always to the default printer. How can i have the available printers, and then select the correct one??? Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveSheet.Name = "CARDEX" Then Cancel = True Application.EnableEvents = False Application.ScreenUpdating = False With ActiveSheet On Error Resume Next .Columns("I").SpecialCells(xlCellTypeBlanks).Entir eRow.Hidden = True .Rows("1:6").EntireRow.Hidden = False .PrintOut .Columns("I").SpecialCells(xlCellTypeBlanks).Entir eRow.Hidden = False On Error GoTo 0 End With Application.EnableEvents = True Application.ScreenUpdating = True End If -- Thanks, Emanuel Violante Galeano |
|
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Print Preview Macro
|
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Newbie seeks suggestion on recording new macro to print sheets | New Users to Excel | |||
| cell borders that I create dont show on print preview or print | Excel Discussion (Misc queries) | |||
| Excel becomes sluggish after print preview | Excel Discussion (Misc queries) | |||
| Excel cell looks good in print preview but doesn't print??? | Excel Discussion (Misc queries) | |||
| Can't print diagonal borders although they show on print preview | Excel Discussion (Misc queries) | |||
Linear Mode
