Сохранение файла с указанием текущей даты и текущего времени

[Alexsandrr]

Добрый день!
Друзья подскажите пожалуйста!
Вот макрос сохранения файла в папку с указанием текущей даты. Просьба дополнить в макрос текущее время.

ActiveWorkbook.SaveAs Filename:= _
"V:\Отдел планирования закупок\2013\ЗАПАСЫ\ОТЧЕТЫ\Запасы_н а_01.10.2013_" & Left(Now, 10) & ".xlsx", FileFormat _
:=xlOpenXMLWorkbook, CreateBackup:=False

[Stilet]

Так ведь Now тебе и так вернет текущее время...
Или я чего-то не понимаю.

[Alexsandrr]

Файл сохраняется "название+текущая дата".
А мне нужно чтобы еще время "ч мин" после даты ставил.

[Serge_Bliznykov]

попробуйте такой код

ActiveWorkbook.SaveAs Filename:= _
"V:\Отдел планирования закупок\2013\ЗАПАСЫ\ОТЧЕТЫ\Запасы_на_01.10.2013_" & Left(Now, 13) & "ч" & Mid(Now, 15, 2) & "м.xlsx", FileFormat _
:=xlOpenXMLWorkbook, CreateBackup:=False

там между датой и временем пробел будет. Если не нужен - можно его убрать или заменить на что-нибудь.
Идея Вам, надеюсь, понятна?

[Alexsandrr]

Все супер! Спасибо большое!