Устранение косой черты в именах файлов при сохранении с помощью макроса - Советы по Excel

Содержание

Дипак спрашивает:

Привет, я пытаюсь назначить текущую дату ячейке A38, используя, =NOW()а затем сделать SaveAs, назначив содержимое этой ячейки в качестве имени файла для сохраняемого файла. Я не могу написать для него правильный код.

ChDir "C:Backup" ActiveWorkbook.SaveAs Filename: = Range("A38").Text, FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False

В приведенном выше коде все, что мне нужно сделать, это заменить имя файла содержимым ячейки A38, которая всегда будет содержать текущую дату. Буду признателен, если вы сообщите мне, как правильно написать этот код. Я попытался заменить имя файла несколькими вещами, глядя на tip025 на www.mrexcel.com, но это не сработало.

Проблема возникает, когда формат даты включает символ «/»… попробуйте следующее:

ActiveWorkbook.SaveAs Application.Substitute(Range(“A38”).Text,”/”,”-“)

Интересные статьи...