Print Button

[skf786]

Hi,

i need to add a print button on a file. “Print” function should pull up print dialog and allow users to select printer and other options. Should select all of the tabs (printable area already set on each sheet) except sheet named ABC and send them into Print Preview. Remaining four sheets are named 1,2,3,4

thanks

KF

 

[mrshl9898]

How does this suit your needs?

Would require them to select "Entire Workbook" in the box

Sub PrintPreview()
    Sheets("ABC").Visible = False
    Temp = Application.Dialogs(xlDialogPrint).Show
    Sheets("ABC").Visible = True
End Sub

 

[skf786]

How does this suit your needs?

Would require them to select "Entire Workbook" in the box

Sub PrintPreview()
    Sheets("ABC").Visible = False
    Temp = Application.Dialogs(xlDialogPrint).Show
    Sheets("ABC").Visible = True
End Sub

Hi, this is the error i'm seeing.

 

[mrshl9898]

Strange that didn't happen to me. Maybe conflicting within Excel somewhere due to the name. Just rename it to something else eg.

 Sub PrintPreviewx ()

 

[skf786]

Thanks so much. this works perfectly!