selecting a series of worksheets for printing not whole workbook

[MikeR-Oz]

Can this be done? I have 5 sheets in the book but want to print only 3 of teh
worksheets. When I look at the File/print/ it only gives me the option of
the whole book?

Ta

Mike

 

[Dave Peterson]

You can group the 3 sheets you want.

Select the first sheet, ctrl-click on the subsequent tabs and then print.

Remember to ungroup the sheets when you're done.

 

[Don Guillett]

Something like this.

Sub printselectedshts()
myarray = Array("sheet1", "data")
For Each sh In myarray
'MsgBox Sheets(sh).Range("a1")
MsgBox Sheets(sh).PrintOut 'Preview
Next sh
End Sub