Sub PrintSpecificSheet(ByVal i As Integer)
Sheets(i).Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate _
:=True
End Sub
Where i is the Index of the sheet you want to print. you can overload this
to accept a String which could be the WorkSheet name, or you could just
change it to a string...
Want to reply to this thread or ask your own question?
You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.