How do i print all visible sheets ?

[Luc]

Title says it all !!!

Thanks for your help

Luc

 

[Dave Peterson]

Record a macro when you select/group all the sheets and print them. Remember to
ungroup them when you're done.

 

[Luc]

Thanks, but the number of sheets is not fix, it can be 2 to x

 

[Ron de Bruin]

Try
http://www.rondebruin.nl/print.htm#Hidden

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm

Thanks, but the number of sheets is not fix, it can be 2 to x

 

[Per Jessen]

Hi

Try this one:

Sub printSheets()
For Each sh In ThisWorkbook.Sheets
If sh.Visible = True Then
sh.PrintOut
End If
Next
End Sub

Regards,
Per

Thanks, but the number of sheets is not fix, it can be 2 to x

 

[Dave Peterson]

Rightclick on any of the sheet tabs that is visible.
You'll see an option to "select all sheets"
This will select all 2 to x sheets.

 

[Dave Peterson]

Or you could just record a macro when you show the print dialog:

File|Print (in xl2003 menus)
Select entireworkbook

The hidden sheets won't be printed.