Macro to rename sheets based off cell value

It's still not clear to me.

Do you have a workbook with multiple sheets like:
11-02
11-12
11-20
11-30
And you want a code that change the 11 into a 12?

OR

Do you have a list with dates and you want to create a sheet for each date in the list?

OR

Something else....

the current workbook for November has sheets for 6 work days a week Monday thru Saturday. So the sheets are named 11-02, 11-03, 11-04, 11-05, 11-06, 11-07, 11-09, and so on till 11-28. each sheet is dated in cell A5 in mm/dd/yyyy format. Of course a sheet can't be named in this format so in cell AB4 [=A5] in mm-dd format. I thought after doing that I could use this macro.

Sub RenameTabs()
'Updateby20140624
For x = 1 To Sheets.Count
If Worksheets(x).Range("AB4").Value <> "" Then
Sheets(x).Name = Worksheets(x).Range("AB4").Value
End If
Next
End Sub

However the macro reed it in the original format mm/dd/yyyy. I would like it to read from a cell on the page like I tried to do.