The macro is not the only way.

You can just select the sheets as Luke suggested then FilePrintActive Sheet(s)

Or if you record a macro whilst selecting the sheets you will get code like
this.

Sheets(Array("Sheet1", "Sheet4", "Sheet7", "Sheet12")).Select
ActiveWindow.SelectedSheets.PrintOut


Gord

On Wed, 21 May 2008 23:30:03 -0700, JohnD
wrote:

Thanks for your help and prompt reply Gord. Is the macro the only way or
could i organise the worksheets better.

"Gord Dibben" wrote:

Record a macro whilst doing this and run it next time you print.

Or use this generic macro which prints just the pre-selected sheets.

Sub Printit()
ActiveWindow.SelectedSheets.PrintOut
End Sub


Gord Dibben MS Excel MVP

On Wed, 21 May 2008 11:59:02 -0700, Luke M
wrote:

Not the best solution, but you can hold down 'ctrl' and select the 4 sheets
you want to print, and then under print options, where you choose what you
want to print, select "active sheet(s)"