Если дата меньше СЕГОДНЯ, то заменить на СЕГОДНЯ

Дата: Пятница, 21.10.2022, 10:02 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 5

Репутация: 0 ±

Замечаний: 0% ±

Доброго времени суток, о гуру Excel!
Казалось бы простой вопрос но не могу его решить, поэтому решил обратиться к вам.
Суть проблемы:
Есть таблица с датами в столбце G.
Как сделать так, что если дата в столбце G меньше СЕГОДНЯ (в таблице ячейка С1), то дата автоматически заменялась на сегодняшнюю дату.
Таблица во вложении.
Сори, если что не так описал и заранее всех благодарю!

К сообщению приложен файл: 1669664.xls (33.5 Kb)

Дата: Пятница, 21.10.2022, 10:07 | Сообщение № 2

Группа: Друзья

Ранг: Экселист

Сообщений: 8759

Репутация: 2273 ±

Замечаний: 0% ±

Excel 2010

Обязательно наступит день, когда даты в столбце G будут меньше его.

ЮMoney 41001841029809

Дата: Пятница, 21.10.2022, 10:19 | Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 5

Репутация: 0 ±

Замечаний: 0% ±

Nic70y, это понятно.
Но в том то и дело чтобы считать сколько дней просрочено на сегодняшнюю дату.

Дата: Пятница, 21.10.2022, 10:26 | Сообщение № 4

Группа: Друзья

Ранг: Экселист

Сообщений: 8759

Репутация: 2273 ±

Замечаний: 0% ±

Excel 2010

У вас нет в таблице состоявшейся отгрузки.

Код

=МАКС(C$1;G3)-F3

ЮMoney 41001841029809

Дата: Пятница, 21.10.2022, 10:41 | Сообщение № 5

Группа: Пользователи

Ранг: Прохожий

Сообщений: 5

Репутация: 0 ±

Замечаний: 0% ±

Nic70y, нету потому что состоявшейся отгрузки удаляю из таблицы, да и вопрос то не в этом.
Не придирайтесь к таблице))) я ее упростил чтобы изложить суть вопроса.
Вопрос можно ли заменить дату на СЕГОДНЯ или нет?

Дата: Пятница, 21.10.2022, 11:00 | Сообщение № 6

Группа: Друзья

Ранг: Экселист

Сообщений: 8759

Репутация: 2273 ±

Замечаний: 0% ±

Excel 2010

Ruha, можно макросом, а формула выше, которая посчитает дни просрочки с учетом СЕГОДНЯ, не заменяя даты Вас не устроила?

Цитата Ruha, 21.10.2022 в 10:41, в сообщении № 5 (

)

Не придирайтесь

я не придираюсь, пытаюсь выяснить, что Вам нужно получить. Очень часто люди просто не могут объяснить чего хотят.

ЮMoney 41001841029809

Дата: Пятница, 21.10.2022, 11:39 | Сообщение № 7

Группа: Пользователи

Ранг: Прохожий

Сообщений: 5

Репутация: 0 ±

Замечаний: 0% ±

Конечно немного не то, что я хотел изначально.
Но наверно можно и так, а неактуальные даты через Условное Форматирование подсветить желтым.
Только тогда вопрос следующий, как сделать чтобы в пустых ячейках не ставил число 44855.
Файл во вложении

К сообщению приложен файл: __1.xls (35.0 Kb)

ShAM

Дата: Пятница, 21.10.2022, 11:56 | Сообщение № 8

Группа: Друзья

Ранг: Старожил

Сообщений: 1347

Репутация: 249 ±

Замечаний: 0% ±

Excel 2010

Добавить проверку

Код

=ЕСЛИ(G3="";"";МАКС(C$1;G3)-F3)

Дата: Пятница, 21.10.2022, 12:03 | Сообщение № 9

Группа: Друзья

Ранг: Экселист

Сообщений: 8759

Репутация: 2273 ±

Замечаний: 0% ±

Excel 2010

формула

Код

=ЕСЛИ(G3;МАКС(C$1;G3)-F3;"")

макрос
[vba]

Код

Sub u_700()
    Application.ScreenUpdating = False
    a = Cells(Rows.Count, "g").End(xlUp).Row    'нижняя дата
    For b = 3 To a                    '3 - верхняя дата
        If Range("g" & b).Value < Date Then Range("g" & b) = Date
    Next
    Application.ScreenUpdating = True
End Sub

[/vba]

К сообщению приложен файл: _1.xlsm (19.3 Kb)

ЮMoney 41001841029809

Дата: Пятница, 21.10.2022, 12:19 | Сообщение № 10

Группа: Пользователи

Ранг: Прохожий

Сообщений: 5

Репутация: 0 ±

Замечаний: 0% ±

Спасибо, всем!
Буду "допиливать" свою таблицу.
Если будут еще вопросы, напишу.))