Canceling a Print Job

Originally Posted by shg

Need to see the rest of the code.

    
    Sheets("Sheet1").Select
    Application.Dialogs(xlDialogPrint).Show

    Sheets("Sheet2").Select
    ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"

    Sheets("Sheet3").Select
    ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"