[Eirstream]

MsgBox добавил для отладки - удалите при боевом применении а Ваш код вааще не ясен: в 4 строке что творится 1-го числа, получим 0-день? ИМХО, 40 строка - вообще неверный синтаксис »

Попробовал вашу часть кода, все также пишет, что "не удается найти указанный файл"
Я же правильно понял, вашу фразу - daydate = Replace(DateAdd("d", -1, Date), ".", "") вместо своей строки с датой?

а Ваш код вааще не ясен: я сам его не понял, взял и готового, который обрезал число до такого 2503_пампам, а мне нужно было 25032021_, я долго пытался и в итоге добавил в конце эту фразу - &right(Date,4).