Funkcja czasu 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 funkcja ta 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 jest rodzajem funkcji nietrwałej, nie ma żadnej składni.

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

CZAS ()

Musimy tylko wprowadzić funkcję, w rzeczywistości nie ma potrzeby umieszczania nawiasów, aby ująć tylko CZAS, 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.

Możesz pobrać ten szablon funkcji czasu VBA tutaj - szablon funkcji czasu VBA

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 klawiszem F5 lub ręcznie uzyskamy aktualny czas.

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

Alternatywa dla funkcji Now ()

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

Jak powiedziałem na początku artykułu TERAZ można wstawić aktualną datę i godzinę. Jednak możemy 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ę, zobaczysz 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 jest 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 

Spowoduje to zapisanie godzin otwarcia skoroszytu, takich jak poniżej.