Сам по собі Excel не має функції для включення таймера зворотного відліку. Однак з мовою програмування під назвою Visual Basic для додатків, можна написати простий макрос для виконання функції зворотного відліку. У цій статті показано, як створити макрос, який дозволяє таймеру відліковувати до 12 годин, що підходить для керування часом на робочому аркуші.
Відформатуйте комірку таймера
Крок 1
На новому відкритому аркуші перейдіть до клітинки A1. Це буде місце розташування прикладу таймера.
Відео дня
Крок 2
Авторство зображення: Зображення надано Microsoft
Клацніть правою кнопкою миші клітинку A1 і виберіть Формат клітин.
Крок 3
Авторство зображення: Зображення надано Microsoft
Виберіть Час у вікні Категорія та виберіть один із форматів годин: хвилин: секунд. Натисніть добре щоб встановити формат осередку.
Створіть макрос
Крок 1
Авторство зображення: Зображення надано Microsoft
Перейдіть до вікна редагування Visual Basic, натиснувши ALT-F11. Натисніть Вставити з рядка меню та клацніть Модуль.
Крок 2
Авторство зображення: Зображення надано Microsoft
Введіть наступний текст у вікні Module1:
Dim gCount As Date
Підтаймер()
gCount = Зараз + TimeValue("00:00:01")
Застосування. OnTime gCount, "EndMessage"
Кінець суб
Sub EndMessage()
Dim xRng As Range
Встановіть xRng = додаток. ActiveSheet. Діапазон ("A1")
xRng. Значення = xRng. Значення - TimeSerial (0, 0, 1)
Якщо xRng. Значення <= 0 Тоді
MsgBox "Відлік завершено."
Вийти з суб
Кінець Якщо
Таймер виклику
Кінець суб
Ти можеш копіювати і вставляти текст коду вище, або ви можете ввести його, рядок за рядком, у вікні Module1. Редактор VBA застосовує форматування за потреби.
Крок 3
Авторство зображення: Зображення надано Microsoft
Згорніть вікно VBA, натиснувши кнопку - символ у верхньому правому куті. Натисніть Файл на стрічці і Зберегти як. Виберіть місце для збереження файлу. У вікні «Зберегти як» введіть назву робочої книги та виберіть Книга Excel з підтримкою макросів (*.xlsm) від Зберегти як тип випадаючий список. Натисніть Зберегти і повернутися до трудової книжки.
Використання таймера
Крок 1
Натисніть на клітинку A1 і ввійти 0:3:0, потім натисніть Введіть. Це встановлює час на 0 годин, 3 хвилини та 0 секунд.
Крок 2
Натисніть кнопку Переглянути вкладку на стрічці та клацніть Макроси. Виберіть Таймер зі списку макросів і клацніть Біжи. Ваша клітинка таймера почне зворотній відлік до нуля, коли a Зворотний відлік завершено відкривається діалогове вікно. Натисніть добре повернутися до своєї роботи.
Порада
Вам не потрібно використовувати клітинку A1. Розмістіть таймер де завгодно та змініть посилання на клітинку в рядку 8 коду таймера з A1 на будь-яку клітинку, яку ви використовуєте.
