Как правильно вставить дату в данном месте, ПОМОГИТЕ
ActiveWorkbook.SaveAs Filename:= _
"D:\doc\Doc- Дату вставить надо .xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
ActiveWorkbook.Close