VBA teraz

Funkcja Excel VBA Now

NOW jest funkcją daty i czasu w obu VBA, która służy do uzyskania bieżącej daty i czasu systemowego, podobnie jak funkcja arkusza, która nie przyjmuje żadnych argumentów, w VBA funkcja teraz również nie przyjmuje żadnych argumentów, wynik zwraca dla tej funkcji jest data.

Funkcja VBA NOW jest podobna do funkcji arkusza programu Excel. Podobnie jak funkcja DATE w VBA, „TERAZ” również nie ma parametrów do przekazania, wystarczy, że przekazujemy funkcję z zamkniętymi nawiasami lub bez potrzeby stosowania nawiasów. Korzystając z funkcji DATA w VBA, możemy wygenerować aktualną datę jako obraz systemu, nad którym pracujemy. Widziałem jednak sytuacje, w których potrzebujemy również aktualnego czasu wraz z datą. W programie Excel możemy robić wiele różnych rzeczy, podobnie możemy generować bieżącą datę i godzinę za pomocą prostej funkcji o nazwie TERAZ w programie Excel.

Formuła VBA NOW jest prosta.

TERAZ ()

Przykład funkcji NOW w VBA Excel

Spójrz na prosty przykład funkcji TERAZ w VBA. Wykonaj poniższe kroki, aby napisać kod VBA i mieć sporo wiedzy na temat TERAZ, a także pisać kod.

Krok 1: Rozpocznij podprocedurę, podając nazwę makra.

Kod:

 Sub Now_Example1 () End Sub

Krok 2: Zadeklaruj zmienną jako „Data”. Powód, dla którego musimy zadeklarować zmienną jako „Data”, ponieważ nasz wynik końcowy jest w formacie daty i godziny.

Kod:

 Sub Now_Example1 () Dim k As Date End Sub 

Krok 3: Przypisz wartość do zmiennej „k”, stosując funkcję VBA NOW.

Kod:

 Sub Now_Example1 () Dim k As Date k = Now End Sub 

Krok 4: Teraz pokaż wartość funkcji TERAZ, którą przypisaliśmy do zmiennej „k” w oknie komunikatu w VBA.

Kod:

 Sub Now_Example1 () Dim k As Date k = Now MsgBox k End Sub 

OK, gotowe.

Uruchom kod za pomocą klawisza F5 lub ręcznie i zobacz, jaki jest wynik.

Wynik pokazuje 15.04.2019 o 5:03:35.

Format daty w moim komputerze to „mm-dd-rrrr”.

Możemy również zmienić format daty za pomocą funkcji FORMAT. Poniżej znajduje się kod do zmiany formatu daty.

Kod:

 Sub Now_Example1 () Dim k As Date k = Now MsgBox Format (k, "DD-MMM-RRRR HH: MM: SS") End Sub 

Uruchom kod i zobacz różnicę.

Teraz mamy właściwy format daty i czasu. Dzięki temu formatowi każdy może zrozumieć format daty i godziny.

Nietrwały w przyrodzie:

Jak widać w pierwszym przykładzie otrzymaliśmy wynik czasu jako 5:03:35, aw drugim przykładzie otrzymaliśmy wynik jako 17:19:02. To pokazuje, że funkcja TERAZ jest zmienną funkcją, która zmienia się co sekundę.

Alternatywa dla funkcji timera w VBA

Jako alternatywę dla VBA TIMER, możemy użyć funkcji „VBA NOW” do obliczenia całkowitego czasu potrzebnego makro na wykonanie zadania.

Użyj poniższego kodu, aby obliczyć czas potrzebny na Twój kod.

C0de:

 Sub TotalDuration () Dim k As Date k = Now '' 'Tutaj wprowadź swój kod' '' MsgBox "Całkowity czas potrzebny do wykonania zadania przez makro to:" & _ Format ((teraz - k), "HH: MM : SS ”) End Sub 

W zielonym obszarze skopiuj i wklej swój kod.

Wykonaj kod, naciskając klawisz F5 lub naciśnij przycisk Uruchom. Gdy tylko zakończy wykonywanie, otrzymamy czas, jaki zajmuje makro na wykonanie komunikatu zadania w oknie komunikatu. Poniżej znajduje się przykład tego samego.

W ten sposób możemy używać funkcji TERAZ na wiele sposobów w VBA.

Możesz pobrać ten szablon funkcji Excel VBA Now tutaj - Szablon funkcji VBA Now