Need page numbering across workbook and for individual worksheets

[Guest]

I've used the custom header to show "Page ? of ?" and selected all worksheets
in the workbook. When printed this gives Page 1 of 39, Page 2 of 39, etc.
which is perfect. However, each worksheet has multiple pages and we'd like
to have each SHEET show "Page 1 of 1, Page 1 of 2, Page 1 of 3" for the
number of pages in that sheet. Is this possible?

Thank you.

 

[David McRitchie]

Hi Marie,
This is not provided for in Excel (unfortunately).

I think it best to avoid doing this but you would have to modify then print
each page individually, and the printer would restart for each page.

If you are using a network printer you would probably get a splash page(s)
between each printed page, and you would certainly not get duplex printing.

 

[Jim Rech]

You can only do that if you print each sheet one at a time. Easy enough to
do with a macro:

Sub PrintSelectedSheetsOneAtATime()
Dim Sh As Worksheet
For Each Sh In ActiveWindow.SelectedSheets
Sh.PrintOut
Next
End Sub


--
Jim Rech
Excel MVP
| I've used the custom header to show "Page ? of ?" and selected all
worksheets
| in the workbook. When printed this gives Page 1 of 39, Page 2 of 39, etc.
| which is perfect. However, each worksheet has multiple pages and we'd
like
| to have each SHEET show "Page 1 of 1, Page 1 of 2, Page 1 of 3" for the
| number of pages in that sheet. Is this possible?
|
| Thank you.

 

[Guest]

Thank you, David. I thought that was probably the case. Now I can go to the
guy requesting this and tell him it isn't possible.

 

[Gord Dibben]

Marie

Not possible using the method you first posed.

However, Jim Rech provided a macro that would print each sheet as a separate
print job, but print the entire workbook at the same time.

See your original posting.

Gord Dibben Excel MVP