Jak utworzyć licznik czasu skrzynki wiadomości, aby automatycznie zamknąć okno wiadomości po pewnym czasie w programie Excel?
Korzystając ze skoroszytu programu Excel, często do rozwiązywania problemów można używać skryptów VBA. Podczas działania skryptu pojawią się okna z komunikatami. W niektórych przypadkach będziesz chciał, aby niektóre określone okna wiadomości zamykały się automatycznie po określonym czasie, zamiast zamykać je ręcznie. W tym artykule pokażemy metodę tworzenia licznika czasu wyświetlania wiadomości, aby automatycznie zamykać okno wiadomości po określonym czasie w programie Excel.
Utwórz licznik czasu skrzynki wiadomości, aby automatycznie zamknąć okno wiadomości po określonym czasie
Tutaj zawiera szablon skryptu VBA, aby utworzyć licznik czasu okna wiadomości.
Przypuśćmy, że używasz skryptu VBA do przenoszenia wierszy na podstawie wartości komórki. Po zakończeniu przenoszenia, potrzebujesz wyskakującego okienka z informacją, że operacja się powiodła, a to okno komunikatu musi zamknąć się automatycznie po 4 sekundach (patrz poniższy zrzut ekranu). Wykonaj poniższe czynności.
1. Otworzyć Microsoft Visual Basic for Applications okno, kliknij wstawka > Moduł, a następnie wstaw kod VBA, którego chcesz użyć do przenoszenia wierszy na podstawie wartości komórki.
2. Skopiuj następujący kod VBA 1 i umieść go przed kodem, który chcesz obsługiwać. Zobacz zrzut ekranu poniżej:
Kod 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. Skopiuj poniższy kod VBA 2 i umieść go przed wierszem „End Sub” kodu, który chcesz obsługiwać.
Kod VBA 2:
Call CustomTimeOffMsgBox(0, "Moved successfully. This message box will be closed after 4 seconds", "Kutools for Excel", vbInformation, 0, 4000)
Note: Możesz zmienić zawartość okna wiadomości i czas wyświetlania okna dialogowego zgodnie z własnymi potrzebami.
4. Po uruchomieniu kodu w celu wykonania operacji pojawi się komunikat, a następnie zamknie się automatycznie po określonym czasie (w tym przypadku 4 sekundy).
Powiązane artykuły:
- Jak wyświetlić okno komunikatu po kliknięciu określonej komórki w programie Excel?
- Jak skopiować tekst z okna wiadomości w programie Excel?
- Jak wyświetlić okno komunikatu po aktywacji / otwarciu określonego arkusza roboczego w programie Excel?
- Jak wyświetlić okno komunikatu, aby wyświetlić zakres komórek lub wartości komórek w programie Excel?
- Jak wyświetlić okno komunikatu, jeśli wartość komórki zmienia się w zakresie w programie Excel?
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!