Як створити таймер вікна повідомлення для автоматичного закриття вікна повідомлення через певний час в Excel?

Використовуючи книгу Excel, ви часто можете використовувати сценарії VBA для вирішення проблем. Під час виконання сценарію з’являться вікна повідомлень. У деяких випадках потрібно, щоб деякі вказані вікна повідомлень закривалися автоматично через певний час, замість того, щоб закривати їх вручну. У цій статті ми покажемо вам спосіб створення таймера вікна повідомлень для автоматичного закриття вікна повідомлення через певний час у Excel.

Створіть таймер вікна повідомлення для автоматичного відхилення вікна повідомлення через певний час

Створіть таймер вікна повідомлення для автоматичного відхилення вікна повідомлення через певний час

Тут наведено шаблон сценарію VBA для створення таймера вікна повідомлень.

Припустимо, що ви використовуєте сценарій VBA для переміщення рядків на основі значення комірки. Після завершення переміщення вам потрібне спливаюче вікно повідомлення про те, що операція пройшла успішно, і це вікно повідомлень має автоматично закритися через 4 секунди (див. знімок екрана нижче). Виконайте наведені нижче дії.

1. відкрити Microsoft Visual Basic для додатків вікна, натисніть Insert > Модулі, а потім вставте код VBA, який потрібно використовувати для переміщення рядків на основі значення комірки.

2. Скопіюйте наступний код VBA 1 і помістіть його перед кодом, який ви хочете використовувати. Дивіться знімок екрана нижче:

Код VBA 1:

Private Declare PtrSafe Function CustomTimeOffMsgBox Lib "user32" Alias "MessageBoxTimeoutA" ( _
            ByVal xHwnd As LongPtr, _
            ByVal xText As String, _
            ByVal xCaption As String, _
            ByVal xMsgBoxStyle As VbMsgBoxStyle, _
            ByVal xwlange As Long, _
            ByVal xTimeOut As Long) _
    As Long

3. Скопіюйте код VBA 2 нижче та помістіть його перед рядком "End Sub" коду, який ви хочете використовувати.

Код VBA 2:

 Call CustomTimeOffMsgBox(0, "Moved successfully. This message box will be closed after 4 seconds", "Kutools for Excel", vbInformation, 0, 4000)

примітки: Ви можете змінити вміст вікна повідомлення та час відображення діалогового вікна відповідно до ваших потреб.

4. Після запуску коду для виконання операції з'явиться вікно повідомлення, яке потім автоматично закриється через певний час (у цьому випадку 4 секунди).

Статті по темі:

• Як спливати вікно повідомлення при натисканні на певну комірку в Excel?
• Як скопіювати текст із вікна повідомлення в Excel?
• Як спливати вікно повідомлення при активації / відкритті певного аркуша в Excel?
• Як спливаюче вікно повідомлення відображати діапазон комірок або значення комірок в Excel?
• Як спливати вікно повідомлення, якщо значення комірки змінюється в межах діапазону в Excel?