worksheets("Menu").select

Put this as the last line of your code before end sub

"pano" wrote:

I am using the following attached to a button on the menu sheet however
when the print command is finished it always takes me to the monday
sheet. How do I get the damn thing to print and stay on the menu sheet

Sub PrintMontoFrid()
'Print out End Of Week Stats
Application.ScreenUpdating = False
Sheets(Array("monday", "monback")).Select
ActiveWindow.SelectedSheets.PrintOut
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, copies:=1,
Collate _
:=True

End Sub

Thanks in advance