Sequential Page Numbering

J

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

Tom Ogilvy

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

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!
Click to expand...

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
 
Top