How about a macro?

Sub DoNumbering()
Dim mySh As Worksheet
For Each mySh In Worksheets
mySh.Range("A1").Value = mySh.Index
Next mySh
End Sub

HTH,
Bernie
MS Excel MVP


"Chronological Numbering" m wrote in message
...
I have 30 spreadsheets in one file, and would like to chronologicaly number
them (have a certain cell display the number of that spreadsheet). I don't
want to have to go to each spreadsheet and write a formula linking that
spreadsheet to the previous one. Is there a way to have the cell in each
spreadsheet look up the value of the same cell in the previous spreadsheet
and add 1, without having to do this manually on every single one?

Thanks