How to Print hidden sheets without viewing the sheet being printed

Requirement:

The user has a command button running a code which prints sheets in a workbook. The sheets being printed are hidden, but as the code runs it shows the hidden sheet before it prints and the user does not want the hidden sheet shown. The user wants the sheet with the command button to remain in view the whole time. Ideally the user would also prefer not see the print dialogue box either.

Solution:

adding this code before and after you print:

Code:

Sub printout()
'
'
Dim rngtoprint
  With Application
    .ScreenUpdating = False
    .EnableEvents = False
  End With
  
  Set rngtoprint = Sheet9
  rngtoprint.printout Preview:=False
  Set rngtoprint = Sheet8
  rngtoprint.printout Preview:=False
  Set rngtoprint = Sheet6
  rngtoprint.printout Preview:=False
  Set rngtoprint = Sheet5
  rngtoprint.printout Preview:=False
  Set rngtoprint = Sheet4
  rngtoprint.printout Preview:=False
  Set rngtoprint = Sheet3
  rngtoprint.printout Preview:=False
  
  With Application
    .ScreenUpdating = True
    .EnableEvents = True
  End With
End Sub

This will stop the sheets being printed from being seen.

Obtained from the OzGrid Help Forum.

Solution provided by gijsmo.