Printing a hidden sheet

[sungen99]

The below macro works just fine when the worksheet is not hidden. But
when it is the macro bombs out.




Sub Button11_Click()
Sheets("Print Ticket").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("Form").Select
Range("E9:F9").Select
End Sub

 

[Guest]

Sheets("Print Ticket").PrintOut Copies:=1, Collate:=True

This line alone should do the trick

 

[Guest]

The below macro works just fine when the worksheet is not hidden. But
when it is the macro bombs out.




Sub Button11_Click()
Sheets("Print Ticket").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("Form").Select
Range("E9:F9").Select
End Sub

try unhiding the sheet whilst it is printed and then hiding it again

E.g

Sub Button11_Click()
sheets("print ticket").visible = xlsheetvisible
Sheets("Print Ticket").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
sheets("print ticket").visible = xlsheetveryhidden
Sheets("Form").Select
Range("E9:F9").Select
End Sub

hope this helps

 

[Norman Jones]

Hi Sungeri,

Try removing the selection:

Sub Button11_Click()
Sheets("Print Ticket")..PrintOut Copies:=1, Collate:=True
End Sub

Selections are rarely necessary and are often inefficient.

 

[Don Guillett]

try this from anywhere in the workbook. Selections are NOT necessary.

Sub printhiddensheet()
Application.ScreenUpdating = False
With Sheets("sheet8")
.Visible = True
.PrintOut
.Visible = False
End With
Application.ScreenUpdating = True
End Sub

 

[sungen99]

Thank you all!