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

Innehållsförteckning

Excel VBA Now-funktion

NU är en datum- och tidsfunktion i både 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, har ”NOW” inte heller parametrar att skicka in. Vi behöver 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 olika saker; På samma sätt kan vi generera aktuellt datum och tid med en enkel funktion som heter NOW 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 såväl som att 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 måste 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 NU-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 den totala tid som makrot tar 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 det slutfört körningen får vi den tid det tar av makrot att slutföra uppgiftsmeddelandet i meddelandefältet. Nedan följer ett exempel på detsamma.

Så här kan vi använda NU-funktionen på många sätt i VBA.

Du kan ladda ner denna Excel VBA Now-funktionsmall här - VBA Now-funktionsmall

Intressanta artiklar...