Funkcija Excel VBA sada
SADA je funkcija datuma i vremena u VBA koja se koristi za dobivanje trenutnog datuma i vremena u sistemu, baš kao i funkcija radnog lista koja ne uzima nikakve argumente, u VBA sada funkcija također ne uzima nikakve argumente, povratni izlaz jer je ova funkcija datum.
VBA NOW funkcija je slična onoj u Excelu u radnom listu. Kao što funkcija DATE u VBA „SADA“ također nema parametre za ulazak, samo trebamo proslijediti funkciju sa zatvorenim zagradama ili bez zagrade. Korištenjem funkcije DATE u VBA možemo generirati trenutni datum kao sistem na kojem radimo. Međutim, vidio sam situacije u kojima nam treba i trenutno vrijeme zajedno s datumom. U Excelu možemo raditi razne vrste stvari, slično tome možemo generirati trenutni datum i vrijeme pomoću jednostavne funkcije koja se u Excelu naziva SADA.
Formula VBA SADA je jednostavna.
SADA ()
Primjer funkcije SADA u VBA Excelu
Pogledajte jednostavni primjer funkcije SADA u VBA. Slijedite korake u nastavku da biste napisali VBA kôd i imali pošteno znanje o SADU, kao i o pisanju koda.
Korak 1: Pokrenite potpostupak davanjem imena makronaredbe.
Kodirati:
Sub Now_Example1 () Kraj Sub
Korak 2: Proglasite varijablu kao "Datum". Razlog zašto trebamo deklarirati varijablu kao “Date” jer je naš krajnji rezultat u formatu Date and Time.
Kodirati:
Sub Now_Example1 () Dim k As Date End Sub
Korak 3: Dodijelite vrijednost varijabli "k" primjenom funkcije VBA SADA.
Kodirati:
Sub Now_Example1 () Dim k Kao datum k = Now End Sub
Korak 4: Sada pokažite vrijednost funkcije SADA koju smo dodijelili varijabli "k" u okviru za poruke u VBA.
Kodirati:
Sub Now_Example1 () Dim k As Date k = Now MsgBox k End Sub
Ok, gotovi smo.
Pokrenite kôd pomoću tipke F5 ili ručno i pogledajte kakav je rezultat.
Rezultat pokazuje 15.4.2019 u 5:03:35.
Format datuma mog računala je "mm-dd-yyyy".
Format datuma također možemo promijeniti pomoću funkcije FORMAT. Ispod je kod za promjenu formata datuma.
Kodirati:
Sub Now_Example1 () Dim k As Date k = Now MsgBox Format (k, "DD-MMM-YYYY HH: MM: SS") End Sub
Pokrenite kod i pogledajte razliku.
Sada imamo odgovarajući format datuma i vremena. Pomoću ovog formata svatko može razumjeti format datuma i vremena.
Hlapljive u prirodi:
Kao što možete vidjeti u prvom primjeru dobili smo vremenski rezultat kao 5:03:35, a u drugom primjeru idemo kao 17:19:02. Dakle, ovo pokazuje da je funkcija SADA hlapljiva funkcija koja se mijenja svake sekunde.
Alternativa funkciji odbrojavanja u VBA
Kao alternativu VBA TIMERU, možemo koristiti funkciju "VBA ODMAH" za izračunavanje ukupnog vremena koje je makronaredba izvršila za izvršavanje zadatka.
Koristite donji kôd za izračunavanje vremena koje vam je potrebno.
C0de:
Sub TotalDuration () Dim k Kao datum k = Sada '' 'Ovdje unesite kod' '' MsgBox "Ukupno vrijeme koje je makronaredba izvršila za izvršavanje zadatka je:" & _ Format ((Sada - k), "HH: MM : SS ") Kraj Sub
U područje zelene boje kopirajte i zalijepite svoj kod.
Izvršite kod pritiskom na tipku F5 ili pritisnite gumb za pokretanje. Čim izvrši izvršenje, dobit ćemo vrijeme koje je makronaredbi potrebno za dovršavanje poruke zadatka u okviru za poruke. Ispod je primjer istog.
Ovako, funkciju SADA možemo koristiti na mnogo načina u VBA.
Ovaj obrazac funkcije Excel VBA Now možete preuzeti ovdje - Predložak funkcije VBA Now