View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Gord Dibben Gord Dibben is offline
external usenet poster
 
Posts: 22,906
Default sequential numbering across multiple worksheets

Manually as Bernard suggests or use a macro.

Sub Date_Increment()
''increment a date in A1 across sheets
Dim myDate As Date
Dim iCtr As Long
myDate = DateSerial(2006, 10, 1)
For iCtr = 1 To Worksheets.Count
With Worksheets(iCtr).Range("A1")
.Value = myDate - 1 + iCtr
.NumberFormat = "mm/dd/yyyy"
End With
Next iCtr
End Sub


Gord Dibben MS Excel MVP

On Mon, 16 Oct 2006 12:20:02 -0700, carrera0000
wrote:

I have multiple worksheets in one excel file. I want to do sequentail
numbering across them.

The point I am trying to acheive is dating them. I have the date in top
right hand corner. In the first worksheet, there is 10-1-06 in cell A1. Then
in worksheet 2 in cell A1, I want 10-2-06 and so forth.

Is this possible?