[megaloman]

DUNAEV78, Объясните:
Имеется файл, например "Дунаев_Д.П._ОТЧЕТ ДД.ММ.ГГГГ.xlsx"
То есть, его создавать не нужно, сегодня существует файл "Дунаев_Д.П._ОТЧЕТ 20.12.2019.xlsx" и туда надо вбить в шапку дату.
Вы хотите чтобы скрипт обращался к файлу с датой в имени.

Код:

FName = "Z:\Box_In\Дунаев_Д.П._ОТЧЕТ ДД.ММ.ГГГГ.xlsx"
ToCell = "B1"

FName = Replace(FName, "ДД.ММ.ГГГГ", Right("0" + CStr(Day(Date)), 2) + "." + Right("0" + CStr(Month(Date)), 2) + "." + CStr(Year(Date)))
Dt = CStr(MonthName(Month(Date)))
Dt = "Отчет за " + Right("0" + CStr(Day(Date)), 2) + " " + Left(Dt, Len(Dt) - 1) + "я " + CStr(Year(Date)) + " г."

With CreateObject("Excel.Application")
    .Visible = True
    .Workbooks.Open FName
    .Range(ToCell) = Dt
    .ActiveWorkbook.Save
    .ActiveWorkbook.Close
    .Quit
End With

Формат даты в имени ДД.ММ.ГГГГ, то есть, например: 01.09.2025