VBA dzisiaj

Funkcja VBA Today

Dzisiaj oznacza bieżącą datę, w arkuszu roboczym funkcja Now robi to samo, co daje nam aktualną datę i godzinę, ale nie ma wbudowanej funkcji dnia dzisiejszego w samym VBA, metodą uzyskania aktualnej daty systemu jest użycie funkcji daty i w przeciwieństwie do funkcji now, funkcja daty podaje tylko aktualną datę.

W programie Excel mamy kilka przydatnych funkcji, które mogą nam pomagać na co dzień. Excel ułatwił nam życie w miejscu pracy. Kiedy mówię „codziennie” program Excel ma formułę zwracania również dzisiejszej daty, a nie tylko daty, możemy również uzyskać razem aktualną datę i godzinę. Taka jest różnorodność formuł programu Excel. Jeśli jesteś regularnym użytkownikiem programu Excel, mam nadzieję, że natknąłeś się na formułę „DZIŚ” w programie Excel, aby wstawić bieżącą datę tak, jak jest wyświetlana na działającym komputerze. Ale nie mamy funkcji DZIŚ w VBA, więc jak uzyskać datę DZIŚ z VBA. W tym artykule dowiesz się, jak pracować z datą DZIŚ w języku VBA. Czytaj.

Jaka jest formuła uzyskania dzisiejszej daty w VBA?

Jeśli nie ma formuły o nazwie DZISIAJ, jak uzyskać dzisiejszą datę z VBA? To jest typowe pytanie, które wszyscy zadają, ale rozwiązanie jest proste, mamy formułę o innej nazwie, np. Funkcja DATA.

Jaka funkcja daty działa w VBA?

DATA jest dokładnie taka sama jak funkcja VBA TODAY, ale nie jest to funkcja ulotna, chyba że uruchomisz makro lub uruchomisz makro.

W składni funkcji DATA nie ma żadnych argumentów, wystarczy, że przekazujemy funkcję DATA i to wszystko.

DATA ()

Przykłady funkcji daty w VBA

DATA, aby zwrócić bieżącą datę systemu. Jest to bardzo przydatne, gdy używamy tego jako części dużego projektu VBA. Aby mieć rzetelną wiedzę na ten temat, najpierw pokażę proste przykłady funkcji DATA.

Przykład 1

Utwórzmy prostą funkcję DATE, aby pokazać bieżącą datę w oknie komunikatu. Wykonaj poniższe czynności, aby napisać makro programu Excel.

Krok 1: Utwórz podprocedurę, nadając nazwę makro.

Krok 2: Zadeklaruj zmienną jako „Data”. Funkcja DATE zwraca wynik tylko jako datę, więc zmiennym typem danych powinno być „Data”.

Kod:

 Sub Today_Example1 () Dim K As String End Sub 

Krok 3: Przypisz wartość do zmiennej „k” jako funkcja DATA .

Kod:

 Sub Today_Example1 () Dim K As String K = Date End Sub 

Krok 4: Teraz wartość zmiennej „k” w oknie komunikatu w VBA .

Kod:

 Sub Today_Example1 () Dim K As String K = Date MagBox K End Sub 

Uruchom kod, w którym powinniśmy zobaczyć aktualną datę w systemie.

Uwaga: format daty może się różnić w zależności od ustawień systemu. Może mieć format „dd-mm-rr”, „dd-mm-rr”.

Funkcja daty, aby znaleźć termin płatności to dzisiaj

Funkcja daty jest bardziej pomocna w kontekście wyszukiwania terminów EMI, płatności kartą kredytową, płatności ubezpieczeniowych itp.

Załóżmy, że pracujesz jako specjalista ds. Windykacji i masz listę klientów wraz z kwotą i terminem płatności.

W kolumnie statusu potrzebny jest wynik „Termin płatności dzisiaj”, jeśli termin płatności jest równy bieżącej dacie systemowej.

Można to zrobić za pomocą warunku IF i pętli w języku VBA. Poniżej znajduje się gotowy kod, dzięki któremu uzyskasz wyniki.

Kod:

 Sub Today_Example2 () Dim K As Integer For K = 2 do 11 If Cells (K, 3) .Value = Date Then Cells (K, 4) .Value = "Due is on Today" Else Cells (K, 4) .Value = „Nie dzisiaj” kończy się, jeśli następny K kończy sub 

Spowoduje to wyświetlenie wyników w kolumnie stanu.

Tak jak w wielu scenariuszach, możemy użyć funkcji DATA, aby sprawdzić daty i wykonać jakąś akcję.

Możesz pobrać tę funkcję VBA Today tutaj. VBA Today Function Szablon programu Excel