Макрос для автоматической даты

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Макрос для автоматической даты (Формулы/Formulas)

maxx

Дата: Понедельник, 19.09.2016, 07:48 | Сообщение № 1

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

Ранг: Участник

Сообщений: 54

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

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

Excel 2013

Доброе утро!
В столбце "статус", при выборе в ниспадающем окне "выдано", справа от выдано должна появиться текущая дата...
Подскажите макрос для этого пожалуйста

К сообщению приложен файл: 1868017.xlsx (11.4 Kb)

начинающий

Сообщение отредактировал maxx - Понедельник, 19.09.2016, 07:48

Ответить

buchlotnik

Дата: Понедельник, 19.09.2016, 09:02 | Сообщение № 2

Группа: Заблокированные

Ранг: Участник клуба

Сообщений: 3442

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

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

2010, 2013, 2016 RUS / ENG

так нужно? [vba]

Код

Private Sub Worksheet_Change(ByVal Target As Range)
If Target = "выдано" Then Target.Offset(, 1) = Now()
End Sub

[/vba]

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

Сообщение отредактировал buchlotnik - Понедельник, 19.09.2016, 09:08

Ответить

maxx

Дата: Пятница, 03.07.2020, 23:41 | Сообщение № 3

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

Ранг: Участник

Сообщений: 54

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

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

Excel 2013

В продолжение этой моей старой темы. Можно ли сделать такое при помощи условного форматирования, формулы? Макросы темный лес. приложенный файл все еще актуален.

начинающий

Сообщение отредактировал maxx - Пятница, 03.07.2020, 23:42

Ответить

Sobirjon

Дата: Суббота, 04.07.2020, 08:16 | Сообщение № 4

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 151

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

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

2016

Цитата maxx, 03.07.2020 в 23:41, в сообщении № 3 ()

Можно ли сделать такое при помощи условного форматирования, формулы?

Если верно понял задачу, то ответ нет! Нельзя!
Условное форматирование умеет только проверять условии и красить, изменять формат ячейки. К сожалению заносить данные в какой либо ячейке не умеет.

Ответить

Pelena

Дата: Суббота, 04.07.2020, 09:02 | Сообщение № 5

Группа: Админы

Ранг: Местный житель

Сообщений: 19174

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

Замечаний: ±

Excel 365 & Mac Excel

maxx, если вставить текущую дату формулой, то она будет меняться каждый день. Вам ведь это не нужно. Можно, конечно, скопировать/вставить как значение, но тогда уж лучше просто сочетанием клавиш.
Текущую дату можно вставить сочетанием клавиш Ctrl+Ж или, если не сработает, Ctrl+Shift+4

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

maxx

Дата: Воскресенье, 05.07.2020, 00:57 | Сообщение № 6

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

Ранг: Участник

Сообщений: 54

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

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

Excel 2013

Pelena, Вы правы, но я имею же главное - сам макрос, который дал мне buchlotnik, я просто не знал, как его заставить работать. немного покапавшись у меня получилось. Оно работает!
в любом случае спасибо за ответ. не знал, что текущую дату так можно вставить.

начинающий

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Макрос для автоматической даты (Формулы/Formulas)

Страница 1 из 1
1