Sequential Page Numbering

[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!

 

[Tom Ogilvy]

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

 

[Lynn A.]

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.aspx?scid=kb;EN-US;214258

 

[ste mac]

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