ExcelBanter - Print Multiple worksheets

ExcelBanter (https://www.excelbanter.com/)

- Excel Worksheet Functions (https://www.excelbanter.com/excel-worksheet-functions/)

- - Print Multiple worksheets (https://www.excelbanter.com/excel-worksheet-functions/247530-print-multiple-worksheets.html)

Ted

Print Multiple worksheets

I need to print all worksheets between sheets named "Start" and "End". Does
anyone have a macro to do this?

Jacob Skaria

Print Multiple worksheets

Try the below

Sub Macro()
Dim intTemp As Integer
For intTemp = Sheets("Start").Index To Sheets("End").Index
Sheets(intTemp).PrintOut Copies:=1, Collate:=True
Next intTemp
End Sub

If this post helps click Yes
---------------
Jacob Skaria

"Ted" wrote:

I need to print all worksheets between sheets named "Start" and "End". Does
anyone have a macro to do this?

Ted

Print Multiple worksheets

Worked Great! Thanks!

"Jacob Skaria" wrote:

Try the below

Sub Macro()
Dim intTemp As Integer
For intTemp = Sheets("Start").Index To Sheets("End").Index
Sheets(intTemp).PrintOut Copies:=1, Collate:=True
Next intTemp
End Sub

If this post helps click Yes
---------------
Jacob Skaria

"Ted" wrote:

I need to print all worksheets between sheets named "Start" and "End". Does
anyone have a macro to do this?

All times are GMT +1. The time now is 04:48 PM.