I don't understand why it isn't working
[VBA]Sub test()
Dim sheet As Worksheet
Dim today As Date
today = Format(Now, "mm-dd")
Debug.Print today
For Each sheet In ActiveWorkbook.Sheets
'Debug.Print sheet.Name
Next sheet
End Sub
[/VBA]
Shouldn't the output be 04-18? Instead I'm getting 4/18/2012. What am I missing here?