creating a date range on sheets

[mbote131]

How can I rename sheets with a wide date range without having to manually type in each date?

Thanks

[martindwilson]

??????????????????

[mbote131]

I need to create a sheet for each day from 7/8/2011 to 11/30/2011, how can I do this without having to do it manually for each day?

[martindwilson]

you need someone to write some code for you

[Domski]

Here you go:

Sub test()

Dim lngCount As Long

For lngCount = DateSerial(2011, 7, 8) To DateSerial(2011, 11, 30)

    Worksheets.Add after:=Sheets(Sheets.Count)
    Sheets(Sheets.Count).Name = Format(lngCount, "mm-dd-yyyy")
    
Next lngCount

End Sub

Dom