Funky,

Try something like this:

Sheets(Array("Sheet1", "Sheet2", "Sheet3", "Sheet4", _
"Sheet5")).Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

Rgrds

Giles

"funkymonkUK" wrote:


Hi

I have a workbook say with worksheets names from Sheet1 to sheet6. not
those exact names but just as an example.

what I want to do is select sheet1 to sheet5 and print. i thought maybe
something along the lines of

Sheet(1 - (sheets.count -1)).select
selection.print

but it doesn't seem to work.


--
funkymonkUK
------------------------------------------------------------------------
funkymonkUK's Profile: http://www.excelforum.com/member.php...o&userid=18135
View this thread: http://www.excelforum.com/showthread...hreadid=549426