VBA nu (steg-för-steg-guide) | Hur använder jag funktionen nu i Excel VBA?

Excel VBA Now-funktion

NU är en datum- och tidsfunktion i båda VBA som används för att få aktuellt systemdatum och -tid, precis som kalkylfunktionen som inte tar några argument i den, i VBA tar nu funktionen inte heller några argument, returutgången för den här funktionen är datum.

VBA NU-funktionen liknar den i Excel-kalkylbladets funktion. Precis som DATE-funktionen i VBA "NU" inte har några parametrar att skicka in, behöver vi bara skicka funktionen med stängd parentes eller inget behov av parentes också. Genom att använda DATE-funktionen i VBA kan vi generera det aktuella datumet som visar det system vi arbetar med. Jag har dock sett situationer där vi också behöver aktuell tid tillsammans med datumet. I Excel kan vi göra många varianter av saker, på samma sätt kan vi generera aktuellt datum och tid med en enkel funktion som heter NU i Excel.

Formeln för VBA NU är enkel.

NU ()

Exempel på NU-funktion i VBA Excel

Titta på det enkla exemplet på funktionen NU i VBA. Följ stegen nedan för att skriva VBA-koden och ha en hel del kunskap om NU samt skriva koden.

Steg 1: Starta delproceduren genom att ge ett makronamn.

Koda:

 Sub Now_Example1 () Avsluta Sub

Steg 2: Förklara variabeln som "Datum". Anledningen till att vi behöver deklarera variabeln som ”Datum” eftersom vårt slutresultat är i datum- och tidsformat.

Koda:

 Sub Now_Example1 () Dim k As Date End Sub

Steg 3: Tilldela värdet till variabeln "k" genom att använda VBA NOW-funktionen.

Koda:

 Sub Now_Example1 () Dim k As Date k = Now End Sub

Steg 4: Visa nu värdet på funktionen NU som vi har tilldelat variabeln “k” i meddelandefältet i VBA.

Koda:

 Sub Now_Example1 () Dim k As Date k = Now MsgBox k End Sub

Okej, vi är klara.

Kör koden med F5-tangenten eller manuellt och se vad resultatet är.

Resultatet visar 2016-04-15 kl 05:03:35.

Min dators format är ”mm-dd-åååå”.

Vi kan också ändra datumformatet med FORMAT-funktionen. Nedan är koden för att ändra datumformatet.

Koda:

 Sub Now_Example1 () Dim k As Date k = Now MsgBox Format (k, "DD-MMM-YYYY HH: MM: SS") End Sub

Kör koden och se skillnaden.

Nu har vi ett korrekt datum- och tidsformat. Med detta format kan vem som helst förstå datum- och tidsformat.

Flyktig i naturen:

Som du kan se i det första exemplet fick vi tidsresultatet som 5:03:35 och i det andra exemplet går vi som 17:19:02. Så detta visar att NOW-funktionen är en flyktig funktion som ändras varje sekund.

Alternativ till timerfunktion i VBA

Som ett alternativ till VBA TIMER kan vi använda “VBA NOW” -funktionen för att beräkna makrot totala tid för att slutföra uppgiften.

Använd koden nedan för att beräkna den tid det tar av din kod.

C0de:

 Sub TotalDuration () Dim k Som datum k = Nu '' 'Ange din kod här' '' MsgBox "Total tid som makrot tar för att slutföra uppgiften är:" & _ Format ((Nu - k), "HH: MM : SS ") Avsluta sub

Kopiera och klistra in din kod i det gröna området.

Kör koden genom att trycka på F5-tangenten eller tryck på kör-knappen. Så snart den har slutfört körningen får vi makrotiden för att slutföra uppgiftsmeddelandet i meddelandefältet. Nedan följer ett exempel på detsamma.