Sequential Page Numbering
 

Would anyone have a macro that loops through all sheets
within any one workbook and generates sequential page
numbers? Thanks in advance for your help!

Sequential Page Numbering
 

If you group the sheets and print them, then the pages will be sequentially
numbered.

--
Regards,
Tom Ogilvy


"jfm" wrote in message
...
Would anyone have a macro that loops through all sheets
within any one workbook and generates sequential page
numbers? Thanks in advance for your help!

Sequential Page Numbering
 

Have you downloaded the report manager? I have found this is great
for multiple ranges on multiple sheets and it's set up as a "report"
and one or two clicks and it prints.

http://support.microsoft.com/default...b;EN-US;214258

"jfm" wrote in message ...
Would anyone have a macro that loops through all sheets
within any one workbook and generates sequential page
numbers? Thanks in advance for your help!

Sequential Page Numbering
 

Hi jfm,

Would anyone have a macro that loops through all sheets
within any one workbook and generates sequential page
numbers? Thanks in advance for your help!

The code below was posted by 'Dave' hope this helps....

Sub ReNameSheets()

Dim x As Integer

For x = 1 To 10
ActiveWorkbook.Sheets(x).Name = "result1" & Format(x, "00")
Next x

End Sub

seeya ste