View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Gary''s Student Gary''s Student is offline
external usenet poster
 
Posts: 11,058
Default putting dates on multiple sheets

This little macro will setup all your sheets:

Sub sheetdater()
For i = 2 To Sheets.Count
Sheets(i).Range("A1").Formula = "=Sheet" & i - 1 & "!A1+1"
Next
End Sub

--
Gary''s Student - gsnu200825


"ramona" wrote:

We are using Excel 2003. I have a workbook for each month so that each sheet
is a different day. These sheets need to be dated. I know that I can enter
the following formula on each sheet so that only the first sheet needs to be
manually dated. For Sheet2 =Sheet1!A1+1; for Sheet3 =Sheet1!A1+2 OR
=Sheet2!A1+1; etc. Is there some way this can be done without having to go
back to each previous sheet or keying in this entire formula? I guess I'm
looking for a simple copy that won't make me have to go back to previous
sheets. I know we will only have to make one workbook (template) but there
will be other times this could be very handy.

Thanks in advance. I love this site!!!