Home |
Search |
Today's Posts |
|
#1
![]() |
|||
|
|||
![]()
I have a workbook with a page for each day of the month, named for the day
and date. I need to copy it for each month. Can I auto fill the tabs on the worksheets like I would a column? |
#2
![]() |
|||
|
|||
![]()
Maybe a little macro???
Option Explicit Sub testme() Dim iCtr As Long Dim myDate As Date myDate = DateSerial(2005, 8, 1) For iCtr = DateSerial(Year(myDate), Month(myDate), 1) _ To DateSerial(Year(myDate), Month(myDate) + 1, 0) Worksheets.Add after:=Worksheets(Worksheets.Count) On Error Resume Next ActiveSheet.Name = Format(iCtr, "dddd mm_dd_yyyy") If Err.Number < 0 Then MsgBox "Error with date: " & Format(iCtr, "mm/dd/yyyy") Err.Clear Application.DisplayAlerts = False ActiveSheet.Delete Application.DisplayAlerts = True End If On Error GoTo 0 Next iCtr End Sub If you're new to macros, you may want to read David McRitchie's intro at: http://www.mvps.org/dmcritchie/excel/getstarted.htm (ps. I used August of 2005 for the month to add.) Sandy@theblade wrote: I have a workbook with a page for each day of the month, named for the day and date. I need to copy it for each month. Can I auto fill the tabs on the worksheets like I would a column? -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Auto Fill Options | Excel Discussion (Misc queries) | |||
How do I auto fill blanks cells immediately below with the same i. | Excel Discussion (Misc queries) | |||
Auto fill option box disappeared | Excel Worksheet Functions | |||
Auto fill box | Excel Discussion (Misc queries) | |||
Auto Fill Options | Excel Discussion (Misc queries) |