Excel numbering in a workbook

  • Thread starter Thread starter forest8
  • Start date Start date
F

forest8

Hi

I currently have a excel workbook that has about 600 individual sheets. I
would like to hardcode a page number of each page. I don't really want to
enter the page numbers manually and was hoping that someone may have a macro
for this.

Any help will be greatly appreciated.
 
Hi,

Right click any worksheet tab, view code and paste this in and run it.
Change the range to where you want the number

Sub numberem()
For x = 1 To Worksheets.Count
Sheets(x).Range("A1").Value = x
Next
End Sub

Mike
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top