Требуется помощь с Excel
Нужно автоматизировать добавление времени к каждой записи в журнале действий. Что-то типа: ввел в ячейке "приступил к работе" и в соседней появилось время записи и так для всех последующих записей. Есть ли решение данной задачи ?
:
Да, это решается через VBA-макрос (событие Worksheet_Change). Создам готовый файл-шаблон журнала и дам код макроса.Готово! Вот что нужно сделать после скачивания файла:
Шаг 1 — Открыть редактор VBAAlt + F11 → в дереве слева дважды кликните лист «Журнал действий»
Шаг 2 — Вставить код
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 2 Or Target.Row < 4 Then Exit Sub
Dim cell As Range
Application.EnableEvents = False
For Each cell In Target
If cell.Column = 2 And cell.Row >= 4 Then
Dim timeCell As Range
Set timeCell = Me.Cells(cell.Row, 3)
If cell.Value <> "" Then
timeCell.Value = Now()
timeCell.NumberFormat = "DD.MM.YYYY HH:MM:SS"
Else
timeCell.ClearContents
End If
End If
Next cell
Application.EnableEvents = True
End Sub
Шаг 3 — Сохранить как .xlsm Файл → Сохранить как → тип «Книга Excel с поддержкой макросов (*.xlsm)»
После этого: вводите текст в столбец «Действие» — время появится автоматически. Если стереть текст — время тоже очистится. Код также находится на листе «Инструкция по макросу» внутри файла.
- Всего доброго, GLAVQA
автоматическое датирование - идеальный вариант это макросы
точная копия вашего вопроса
Да, такое возможно
А можно пожалуйста поподробней
Есть решение через макросы.