macros to auto name sheets

I've tried many times to create a workbook that auto names the sheets by day for a month. I've never done macros before but feel I'm pretty computer literate. The internet if full of code for this but I'm unable to get it to work. Can anyone walk me through step-by-step? I must be missing something!

Hi!

What exactly do you want? Should the macro create worksheets out of thin air and name them or are there already worksheets you want to name? Where should the macro get the date from? Is it already placed somewhere on the worksheet?

It would be great to create from a date range(ex. Jan. 1-31) but I could create. The date will be in "A1" but will be auto populated from a summary/totals sheet.
Thanks,

How about something like this?

That worked great. I've been trying to get this macros but just can't get my head around it. I now need to populate the "A1" cell of each sheet with my range of dates or populate "A1" by sheet name.
Thanks again

It can be done by adding one line. Replace the code in the module to this:

Sub AddSheets()

Dim i As Long
Dim Lr As Long
Dim MySh As Worksheet

Set MySh = ActiveSheet
Lr = Range("A" & Rows.Count).End(xlUp).Row

For i = 2 To Lr
    Worksheets.Add(After:=Worksheets(Worksheets.Count)).Name = MySh.Range("A" & i).Text
    Range("A1").Value = MySh.Range("A" & i).Value
Next i

End Sub