Имя пользователя:
Пароль:
 

Название темы: [решено] Ошибка в дате
Показать сообщение отдельно

Ветеран


Contributor


Сообщения: 2735
Благодарности: 1699

Профиль | Отправить PM | Цитировать


Eirstream, попробуйте
Код: Выделить весь код
daydate = Replace(DateAdd("d", -1, Date), ".", "")
MsgBox Date & vbCrLf & daydate & vbCrLf & "C:\Users\Desktop\мой день\" + daydate + "_сводка.rtf"
MsgBox добавил для отладки - удалите при боевом применении
а Ваш код вааще не ясен: в 4 строке что творится 1-го числа, получим 0-день?
ИМХО, 40 строка - вообще неверный синтаксис

-------
Даже самая сложная проблема обязательно имеет простое, лёгкое для понимания, неправильное решение. Каждое решение плодит новые проблемы.


Последний раз редактировалось megaloman, 04-03-2021 в 08:39.

Это сообщение посчитали полезным следующие участники:

Отправлено: 08:20, 04-03-2021 | #5

Название темы: [решено] Ошибка в дате