Spis treści
W tym artykule pokażę Ci, jak możesz uzyskać aktualną datę w VBA W programie Excel nauczysz się pokazywać aktualną datę, pokazywać aktualną godzinę, a także formatować datę i godzinę w wybranym formacie.
Jak uzyskać bieżącą datę w VBA (szybki podgląd)
Pobierz Zeszyt ćwiczeń
Pobierz ten zeszyt ćwiczeń, aby ćwiczyć zadania podczas czytania tego artykułu.
Pobierz bieżące daty w VBA.xlsm3 Sposoby na uzyskanie bieżącej daty w VBA
Poznajmy najlepsze sposoby na uzyskanie aktualnej daty i czasu w Makro w VBA .
1) Uzyskaj bieżącą datę za pomocą funkcji Date w VBA
Po pierwsze, zobaczmy jak możemy uzyskać bieżącą datę. Bieżącą datę można uzyskać w VBA dość wszechstronnie wykorzystując Funkcja daty z VBA .
Linią kodu będzie:
Current_Date=Date() Kompletny kod do wyświetlania aktualnej daty będzie miał postać:
⧭ VBA Kod:
Sub Get_Current_Date() Current_Date = Date MsgBox Current_Date End Sub Uwaga: Ten kod tworzy Makro o nazwie Get_Current_Date .
⧭ Wyjście:
Uruchom to Makro i dostaniesz Skrzynka wiadomości wyświetlając bieżącą datę, 11-Jan-22 .
Czytaj więcej: Jak wstawić bieżącą datę w Excelu
2. wstawianie bieżącej daty i czasu za pomocą funkcji Now w VBA
Możesz użyć Teraz funkcja VBA aby uzyskać aktualną datę wraz z aktualnym czasem.
Linią kodu będzie:
Current_Date_and_Time = Now() W związku z tym kompletne kod aby wyświetlić aktualną datę i godzinę będzie:
⧭ VBA Kod:
Sub Get_Current_Date_and_Time() Current_Date_and_Time = Now() MsgBox Current_Date_and_Time End Sub Uwaga: Ten kod tworzy Makro o nazwie Get_Current_Date_and_Time .
⧭ Wyjście:
Uruchom to Makro i dostaniesz Skrzynka wiadomości wyświetlanie aktualnej daty i godziny, 11-Jan-22 11:23:20 AM .
Czytaj więcej: Funkcje Now i Format w Excelu VBA
Podobne lektury
- Zmienna Date w kodach VBA (7 zastosowań makr z przykładami)
- Jak używać skrótu do daty w Excelu
- Obliczanie terminu płatności za pomocą formuły w Excelu (7 sposobów)
- Jak używać formuły IF z datami (6 prostych przykładów)
3. formatowanie bieżącej daty i czasu za pomocą funkcji Format w VBA
Do tej pory nauczyliśmy się uzyskiwać aktualną datę i godzinę. Tym razem zobaczmy, jak możemy wyświetlić datę i godzinę w pożądanym przez nas formacie.
3.1 Formatowanie bieżącej daty
Najpierw sformatujemy tylko bieżącą datę.
Użyjemy Format funkcja VBA w tym celu. składnia funkcji jest:
=Format(Data,Format) Dlatego, aby wyświetlić bieżącą datę w formacie dd/mm/rrrr , linijka kodu będzie:
Current_Date = Format(Date, "dd/mm/rrrr")
I kompletny Kod VBA będzie:
⧭ VBA Kod:
Sub Format_Date_and_Time() Current_Date = Format(Date, "dd/mm/rrrr") MsgBox Current_Date End Sub Uwaga: Ten kod tworzy Makro o nazwie Format_Daty_i_czasu .
⧭ Wyjście:
Jeśli uruchomisz ten kod, pokaże on aktualną datę w żądanym formacie, dd/mm/rrrr , 11/01/2022 .
3.2 Formatowanie bieżącej daty i godziny
Możesz również użyć Format funkcja do formatowania aktualnej daty i aktualnego czasu razem.
Wyświetlmy aktualną datę i godzinę w formacie dd/mm/rrrr hh:mm:ss am/pm .
Linią kodu będzie:
Current_Date_and_Time = Format(Now(), "dd/mm/yyyy hh:mm:ss am/pm") I kompletny Kod VBA będzie:
⧭ VBA Kod:
Sub Format_Data_i_czas() Current_Date_i_czas = Format(Now(), "dd/mm/rrrr hh:mm:ss am/pm") MsgBox Current_Date_i_czas End Sub Uwaga: Ten kod tworzy Makro o nazwie Format_Daty_i_czasu .
⧭ Wyjście:
Jeśli uruchomisz ten kod, pokaże on aktualną datę i godzinę w żądanym formacie, dd/mm/rrrr hh:mm:ss am/pm , 11/01/2022 12:03:45 .
Czytaj więcej: Jak formatować datę za pomocą VBA w Excelu
Podsumowanie
- Na stronie TERAZ funkcja Aplikacja Visual Basic zwraca bieżącą datę i czas.
- Na stronie Data Funkcja zwraca bieżącą datę.
- Na stronie Format Funkcja wyświetla datę i godzinę w dowolnym formacie.
Wniosek
Za pomocą tych metod można uzyskać i wyświetlić bieżącą datę i czas w Makro w Excelu. Masz jakieś pytania? Zapytaj nas.
