Зміст
У цій статті показано, як поставити мітку часу в Excel при зміні комірки. Вам може знадобитися відстежувати введення даних в комірках певного стовпця. Наприклад, ви зарезервували стовпець B для введення даних. Тепер ви хочете, щоб при оновленні комірки в стовпці B з'являлася мітка часу в сусідній комірці в стовпці C. Ця стаття допоможе вам зробити це 2 ефективними способами.
Завантажити Практичний посібник
Ви можете завантажити робочий зошит з практики, натиснувши кнопку для завантаження нижче.
Мітка часу в Excel.xlsm2 способи вставки мітки часу в Excel при зміні комірки
1. використання функцій IF, AND, NOW та інших для вставки мітки часу в Excel
Виконайте наведені нижче дії, щоб отримати мітку часу за допомогою формул при зміні комірки.
📌 Кроки
- Перше натискання ALT+F+T відкрити Параметри Excel Потім перейдіть на сторінку Формули Далі встановіть прапорець на вкладці Увімкнути ітеративний розрахунок Потім встановіть прапорець Максимальна кількість ітерацій на 1, після чого натиснути ОК.
- Тепер введіть наступну формулу в комірку C5 Потім перетягніть Ручка наповнення щоб скопіювати формулу в комірку нижче.
=IF(AND(B5"",D5B5),NOW(),IF(B5="","",C5))
- Потім введіть наступну формулу в комірку D5 Далі перетягніть кнопку Ручка наповнення до клітинок нижче, як і раніше.
=IF(B5="","",IF(OR(C5="",AND(ISNUMBER(D5),B5=D5)),D5,B5))
- Тепер почніть вводити значення в клітинки в колонка В Після цього ви отримаєте наступний результат. Ось, колонка D допоміжний стовпчик, який можна приховати, натиснувши правою кнопкою миші після вибору стовпчика.
- Крім того, ви можете просто ввести наступну формулу в комірку C5 щоб отримати той самий результат.
=IF(B5"",IF(C5="",NOW(),C5),"")
- Можливо, вам доведеться змінити форматування комірок в колонка С Виберіть стовпець, натиснувши на номер стовпця вгорі. Потім натисніть CTRL+1 для відкриття Формат комірок Тепер натисніть на кнопку Нестандартні формат числа. Далі введіть д-д-д-д-д-д-д-д-д-д-д-д-д-д-д-д-д-д-д-д-д-д-д-д в Тип Нарешті, натисніть "ОК".
Розбивка формули:
Формула в комірці C5:
➤ IF(B5="","",C5))
На сьогоднішній день, на жаль, це не так. Функція IF не повертає нічого, якщо комірка B5 пустий, інакше повертає те саме значення, що зберігається в C5 .
➤ ЗАРАЗ()
На сьогоднішній день, на жаль, це не так. Функція NOW повертає поточну дату і час.
➤ AND(B5"",D5B5)
На сьогоднішній день, на жаль, це не так. І функція прибутки ПРАВДА якщо обидва аргументи істинні, тобто комірка B5 не порожній і клітини B5 і D5 не мають однакового значення.
➤ IF(AND(B5"",D5B5),NOW(),IF(B5="","",C5))
У разі, якщо І функція прибутки ПРАВДА то в цьому випадку Функція IF повертає поточну дату і час, отримані з Функція NOW В іншому випадку повертає результат, отриманий з аргументу, що містить Функція IF .
Формула в комірці D5:
➤ ISNUMBER(D5)
На сьогоднішній день, на жаль, це не так. Функція ISNUMBER прибутки ПРАВДА if комірка D5 містить число, інакше повертається Неправда. .
➤ AND(ISUMBER(D5),B5=D5)
На сьогоднішній день, на жаль, це не так. І функція прибутки ПРАВДА if комірка D5 містить число та комірки B5 і D5 мають однакове значення. Повертає НЕПРАВДА інакше.
➤ OR(C5="",AND(ISUMBER(D5),B5=D5))
На сьогоднішній день, на жаль, це не так. Функція АБО прибутки ПРАВДА якщо істинний хоча б один з аргументів, тобто комірка C5 порожній або І функція прибутки ПРАВДА Він повертається. НЕПРАВДА якщо всі аргументи не відповідають дійсності.
IF(OR(C5="",AND(ISUMBER(D5),B5=D5)),D5,B5)
На сьогоднішній день, на жаль, це не так. Функція IF повертає те саме значення, що зберігається в комірці D5 якщо Функція АБО прибутки ПРАВДА В іншому випадку повертається значення комірки B5 .
➤ IF(B5="","",IF(OR(C5="",AND(ISUMBER(D5),B5=D5)),D5,B5))
На сьогоднішній день, на жаль, це не так. Функція IF не повертає нічого, якщо комірка B5 В іншому випадку повертається результат, отриманий з аргументу, що містить символ Функція IF .
Детальніше: Як вставити мітку часу в Excel при зміні комірки без VBA (3 способи)
Схожі читання
- Як вставити статичну дату в Excel (4 простих способи)
- Excel VBA: вставка мітки часу під час запуску макросу
- Як вставити штамп дати в Excel при зміні клітинок у рядку
- Конвертація мітки часу Unix в дату в Excel (3 способи)
2. Застосуйте код VBA для вставки мітки часу в Excel при зміні комірки
Ви також можете отримати мітку часу в Excel при зміні комірки за допомогою VBA. Виконайте наведені нижче кроки, щоб мати змогу це зробити.
📌 Кроки
- Спочатку клацніть правою кнопкою миші на вкладці цільового робочого аркуша. Потім виберіть Переглянути код Це відкриє модуль коду для цього конкретного аркуша.
- Далі скопіюйте наступний код, скориставшись кнопкою копіювання у правому верхньому куті.
Private Sub Worksheet_Change(ByVal Target As Range) Dim CellCol, TimeCol, Row, Col As Integer Dim DpRng, Rng As Range CellCol = 2 TimeCol = 3 Row = Target.Row Col = Target.Column If Row <= 4 Then Exit Sub Timestamp = Format(Now, "DD-MM-YYYY HH:MM:SS AM/PM") If Target.Text "" Then If Col = CellCol Then Cells(Row, TimeCol) = Timestamp Else On Error Resume Next Set DpRng = Target.Dependents ForEach Rng In DpRng If Rng.Column = CellCol Then Cells(Rng.Row, TimeCol) = Timestamp End If Next End If End If End Sub
- Після цього вставте скопійований код на порожній модуль, як показано нижче.
- Далі збережіть документ як робоча книга з підтримкою макросів Тепер почніть вводити дані в клітинки стовпчика Б. Тоді ви отримаєте ті ж самі результати, що й раніше.
Пояснення коду VBA:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim CellCol, TimeCol, Row, Col As Integer
Dim DpRng, Rng Як діапазон
Оголошення необхідних змінних.
CellCol = 2
Колонка введення даних.
TimeCol = 3
Стовпчик з позначкою часу.
Row = Target.Row
Col = Target.Column
Запам'ятовування номерів рядка та стовпця виділеної комірки.
If Row <= 4 Then Exit Sub
Будь-які зміни у верхніх 4-х рядках не створюють мітки часу.
Timestamp = Format(Now, "DD-MM-YYYY HH:MM:SS AM/PM")
Мітка часу буде відформатована таким чином, за потреби змініть її.
If Target.Text "" Then
If Col = CellCol Then
Cells(Row, TimeCol) = Мітка часу
Створити мітку часу, якщо виділена комірка порожня.
Після помилки відновити роботу Далі
Ігнорує будь-яку помилку, якщо вона виникає.
Set DpRng = Target.Dependents
За кожну Rng в DpRng
If Rng.Column = CellCol Then
Cells(Rng.Row, TimeCol) = Мітка часу
Створити мітки часу для діапазону комірок, якщо вони не порожні.
Читати далі: Як автоматично вставити записи з мітками часу в Excel (5 способів)
Важливі моменти для запам'ятовування
- Щоб отримати належним чином відформатовану позначку часу, необхідно використовувати спеціальний формат для комірок у стовпчику B.
- Альтернативна формула працює тільки тоді, коли дані вводяться в порожні клітинки.
- Тут введення даних і стовпчик з позначкою часу жорстко закодовані в коді VBA. Вам потрібно модифікувати код на основі вашого набору даних.
Висновок
Тепер ви знаєте, як поставити мітку часу в Excel при зміні комірки. У вас є додаткові запитання чи пропозиції? Будь ласка, використовуйте для цього розділ коментарів нижче. Ви також можете відвідати наш ExcelWIKI блог, щоб дізнатися більше про Excel. Залишайтеся з нами і продовжуйте вчитися.