Macro com salvar data atual

Existe uma maneira de fazer uma macro para salvar um arquivo com o dia atual no nome. Eu quero salvar isso todos os dias com a data correta.

Isto é o que eu tenho como uma macro, bem simples, mas estou tendo problemas em obter a fórmula da data atual no nome do arquivo (se possível)

Sub Save()
    ActiveWorkbook.SaveAs Filename:="X:\file06-21-2012\.xlsm", FileFormat _
    :=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
End Sub

Então amanhã eu gostaria que o marco o salvasse como file06-22-2012.

obrigado

questionAnswers(2)

yourAnswerToTheQuestion