Funkcja czasu VBA - Przykłady użycia funkcji czasu programu Excel VBA

Spisie treści

Funkcja czasu Excel VBA

Funkcja czasu Excel VBA

Funkcja czasu VBA zwraca bieżący czas, należy również zauważyć, że ta funkcja nie ma żadnych argumentów, innym ważnym czynnikiem do zapamiętania jest to, że ta funkcja zwraca bieżący czas systemowy. Korzystając z tej funkcji, możemy faktycznie znaleźć rzeczywisty czas potrzebny do zakończenia procesu przez linię kodów.

CZAS to rodzaj zmiennej funkcji. Nie ma żadnej składni.

Podobną funkcję mamy również w programie Excel - NOW (), która wstawia zarówno bieżący czas, jak i aktualną datę w arkuszu kalkulacyjnym.

CZAS ()

Wystarczy wejść do funkcji. W rzeczywistości nie ma potrzeby umieszczania w nawiasach tylko CZASU, aby wstawić bieżący czas. Wynik podany przez funkcję TIME znajduje się w ciągu.

Jak korzystać z funkcji CZAS w VBA?

Pokażę przykład prostego CZASU w funkcji programu Excel. Wykonaj poniższe kroki, aby utworzyć kod do korzystania z funkcji CZAS.

Krok 1: Utwórz makro.

Kod:

Sub Time_Example1 () End Sub

Krok 2: Zadeklaruj zmienną jako ciąg.

Kod:

Sub Time_Example1 () Dim CurrentTime As String End Sub

Krok 3: Przypisz wartość do tej zmiennej za pomocą funkcji TIME.

Kod:

Sub Time_Example1 () Dim CurrentTime As String CurrentTime = Time End Sub

Krok 4: Teraz pokaż wynik w oknie komunikatu.

Kod:

Sub Time_Example1 () Dim CurrentTime As String CurrentTime = Time MsgBox CurrentTime End Sub

Uruchom ten kod za pomocą klawisza F5 lub ręcznie. Otrzymamy aktualny czas.

Tak więc, kiedy uruchomiłem ten kod, była godzina 11.51.54 rano.

Alternatywa dla funkcji Now ()

Połączenie daty i czasu jako alternatywa dla funkcji TERAZ

Jak powiedziałem na początku artykułu, TERAZ może wstawić aktualną datę i godzinę. Możemy jednak użyć dwóch innych funkcji jako funkcji alternatywnej dla funkcji TERAZ; te dwie funkcje to funkcje VBA DATE i VBA TIME.

VBA Date zwróci bieżącą datę, a godzina zwróci bieżący czas, więc funkcja TERAZ. Poniżej znajduje się zestaw kodu, który wstawi bieżącą datę i godzinę do komórki A1.

Kod:

Sub Time_Example2 () Range („A1”). Value = Date & „” & Time End Sub

Ten kod wstawi bieżącą datę i godzinę do komórki A1.

Możemy również zastosować format do tych wartości za pomocą funkcji FORMAT. Poniższy kod sformatuje datę i godzinę.

Kod:

Sub Time_Example2 () Range („A1”). Value = Date & „” & Time Range („A1”). NumberFormat = „dd-mmm-yyyy hh: mm: ss AM / PM” End Sub

Teraz wynik tego kodu jest następujący.

Śledź skoroszyt Otwórz rekordy za pomocą funkcji czasu w języku VBA

Często musimy znać częstotliwość otwierania naszego skoroszytu. Jest sytuacja, w której dość często otwieramy skoroszyt i wprowadzamy pewne zmiany. Śledząc czas i datę otwarcia skoroszytu, możemy śledzić czas otwarcia skoroszytu.

Utwórz nowy arkusz i zmień jego nazwę na „Arkusz śledzenia”.

Krok 1: Kliknij dwukrotnie ten skoroszyt w edytorze VBE.

Krok 2: Wybierz skoroszyt z rozwijanej listy obiektów.

Krok 3: Jak tylko wybierzesz tę opcję, możesz zobaczyć nowe makro utworzone automatycznie w nazwie „Workbook_Open ()”.

Krok 4: Wewnątrz tego makra będziemy musieli napisać kod do śledzenia daty i godziny otwarcia skoroszytu.

Już napisałem kod, a poniżej kod dla Ciebie.

Kod:

Private Sub Workbook_Open () Dim LR As Long LR = Sheets ("Track Sheet"). Cells (Rows.Count, 1) .End (xlUp) .Row + 1 Sheets ("Track Sheet"). Komórki (LR, 1) .Value = Date & "" & Time () Sheets ("Track Sheet"). Cells (LR, 1) .NumberFormat = "dd-mmm-rrrr hh: mm: ss AM / PM" End Sub