PDA

View Full Version : Problem with Printout Code



Juriemagic
09-30-2015, 05:58 AM
Hi good people!,

I don't know, the printout part worked before, now I'm getting an error stating: "Printout Method of Working Class Failed"...Could someone please assist me with this?...All and any help will be very much appreciated!..Thank you..
Application.ScreenUpdating = False
Sheets("Active Work Orders").Unprotect
Sheets("Active Work Orders").Range("C24:R24").Copy
With Sheets("Active Work Orders").Range("T" & Rows.Count).End(xlUp).Offset(1)
.PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End With
Sheets("WORK ORDER").Unprotect
Application.Dialogs(xlDialogPrinterSetup).Show
ActiveSheet.PrintOut
Sheets("NEW JOB CARDS").Visible = True
Sheets("WORK ORDER").Select
Range("A1").Select
Sheets("WORK ORDER").Visible = xlVeryHidden
Sheets("NEW JOB CARDS").Select
ActiveSheet.Unprotect
Range("AA4").Select
ActiveCell.FormulaR1C1 = "1"
ActiveSheet.Protect