Excel VBA Now-funktion
NU er en dato- og tidsfunktion i begge VBA, der bruges til at få den aktuelle systemdato og -tid, ligesom regnearkfunktionen, der ikke tager nogen argumenter i den, i VBA tager funktionen nu heller ikke nogen argumenter, returoutputtet for denne funktion er dato.
VBA NU-funktionen svarer til den i Excel-regnearksfunktion. Ligesom DATO-funktionen i VBA også "NU" ikke har parametre at videregive, er vi bare nødt til at videregive funktionen med lukket parentes eller intet behov for parentes også. Ved at bruge DATE-funktionen i VBA kan vi generere den aktuelle dato som det system, vi arbejder på. Jeg har dog set situationer, hvor vi også har brug for aktuel tid sammen med datoen. I Excel kan vi gøre mange varianter af ting, ligesom vi kan generere aktuel dato og tid med en simpel funktion kaldet NU i Excel.
Formlen for VBA NU er enkel.
NU ()
Eksempel på NU-funktion i VBA Excel
Se på det enkle eksempel på funktionen NU i VBA. Følg nedenstående trin for at skrive VBA-koden og have en hel del viden om NU samt at skrive koden.
Trin 1: Start underproceduren ved at give et makronavn.
Kode:
Sub Now_Example1 () Afslut Sub
Trin 2: Erklær variablen som "Dato". Årsagen til, at vi har brug for at erklære variablen som "Dato", fordi vores slutresultat er i dato- og tidsformat.
Kode:
Sub Now_Example1 () Dim k Som Dato End Sub
Trin 3: Tildel værdien til variablen “k” ved at anvende VBA NOW-funktionen.
Kode:
Sub Now_Example1 () Dim k as Date k = Now End Sub
Trin 4: Vis nu værdien af funktionen NU, som vi har tildelt variablen “k” i meddelelsesboksen i VBA.
Kode:
Sub Now_Example1 () Dim k As Date k = Now MsgBox k End Sub
Okay, vi er færdige.
Kør koden ved hjælp af F5-tasten eller manuelt og se, hvad resultatet er.
Resultatet viser 15.4.2019 kl. 05:03:35.
Min datoformat på computeren er “mm-dd-åååå”.
Vi kan også ændre datoformatet ved hjælp af FORMAT-funktionen. Nedenfor er koden for at ændre datoformatet.
Kode:
Sub Now_Example1 () Dim k as Date k = Now MsgBox Format (k, "DD-MMM-YYYY HH: MM: SS") End Sub
Kør koden og se forskellen.
Nu har vi et korrekt dato- og tidsformat. Med dette format kan enhver forstå dato- og tidsformatet.
Flygtige i naturen:
Som du kan se i det første eksempel, fik vi tidsresultatet som 5:03:35, og i det andet eksempel, går vi resultatet som 17:19:02. Så dette viser, at NOW-funktionen er en ustabil funktion, der skifter hvert sekund.
Alternativ til timerfunktion i VBA
Som et alternativ til VBA TIMER kan vi bruge “VBA NOW” -funktionen til at beregne den samlede tid, det tager af makroen at fuldføre opgaven.
Brug nedenstående kode til at beregne den tid, det tager af din kode.
C0de:
Sub TotalDuration () Dim k Som dato k = Nu '' 'Indtast din kode her' '' MsgBox "Samlet tid taget af makroen for at fuldføre opgaven er:" & _ Format ((Nu - k), "HH: MM : SS ") Afslut sub
Kopier og indsæt din kode i det grønne område.
Udfør koden ved at trykke på F5-tasten eller tryk på kør-knappen. Så snart den er færdig med udførelsen, får vi den tid, det tager af makroen at fuldføre opgavebeskeden i meddelelsesboksen. Nedenfor er et eksempel på det samme.
På denne måde kan vi bruge NU-funktionen på mange måder i VBA.
Du kan downloade denne Excel VBA Now-funktionsskabelon her - VBA Now-funktionsskabelon