photosdematures.com

Funció Excel VBA Now

ARA és una funció de data i hora en VBA que s’utilitza per obtenir la data i l’hora actual del sistema, igual que la funció de full de càlcul que no inclou cap argument, a la funció VBA ara tampoc no pren cap argument, la sortida de retorn d’aquesta funció és la data.

La funció VBA NOW és similar a la de la funció de full de treball Excel. Igual que la funció DATE a VBA "ARA" tampoc no té paràmetres per passar, només hem de passar la funció amb parèntesi tancat o sense necessitat de parèntesi. Utilitzant la funció DATE a VBA podem generar la data actual com a mostra del sistema en el qual estem treballant. Tot i això, he vist situacions en què també necessitem l’hora actual i la data. A Excel podem fer moltes varietats de coses, de manera similar, podem generar data i hora actuals amb una funció senzilla anomenada ARA en Excel.

La fórmula del VBA ARA és senzilla.

ARA ()

Exemple de funció NOW a VBA Excel

Mireu l'exemple senzill de la funció ARA a VBA. Seguiu els passos que s'indiquen a continuació per escriure el codi VBA i tenir un cert coneixement sobre ARA, així com escriure el codi.

Pas 1: Inicieu el subprocediment donant un nom de macro.

Codi:

 Sub Now_Example1 () Final Sub

Pas 2: Declareu la variable com a "Data". El motiu pel qual hem de declarar la variable com a "Data" perquè el nostre resultat final es troba en format Data i Hora.

Codi:

 Sub Now_Example1 () Dim k As Data End Sub 

Pas 3: Assigneu el valor a la variable "k" aplicant la funció VBA NOW.

Codi:

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

Pas 4: Ara mostreu el valor de la funció ARA que hem assignat a la variable "k" al quadre de missatges de VBA.

Codi:

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

D’acord, ja hem acabat.

Executeu el codi amb la tecla F5 o manualment i vegeu quin és el resultat.

El resultat es mostra el 15/04/2019 a les 5:03:35.

El format de data del meu ordinador és "mm-dd-aaaa".

També podem canviar el format de data mitjançant la funció FORMAT. A continuació es mostra el codi per canviar el format de la data.

Codi:

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

Executeu el codi i vegeu la diferència.

Ara tenim un format de data i hora adequat. Amb aquest format, tothom pot entendre el format de data i hora.

Volàtil per naturalesa:

Com podeu veure al primer exemple, obtenim el resultat temporal a les 5:03:35 i al segon exemple, anem al resultat a les 17:19:02. Per tant, això demostra que la funció ARA és una funció volàtil que canvia cada segon.

Alternativa a la funció de temporitzador en VBA

Com a alternativa al VBA TIMER, podem utilitzar la funció "VBA NOW" per calcular el temps total que ha trigat la macro en completar la tasca.

Utilitzeu el codi següent per calcular el temps que ha passat el vostre codi.

C0de:

 SubDuració total () Dim k As Date k = Now '' 'Introduïu aquí el vostre codi' '' MsgBox "El temps total que ha pres la macro per completar la tasca és:" Format i _ ((Ara - k), "HH: MM : SS ") Final Sub 

A la zona de color verd, copieu i enganxeu el vostre codi.

Executeu el codi prement la tecla F5 o premeu el botó d'execució. Tan bon punt finalitzi l'execució, obtindrem el temps que triga la macro en completar el missatge de tasca al quadre de missatges. A continuació es mostra un exemple del mateix.

Així, podem utilitzar la funció NOW de moltes maneres a VBA.

Podeu descarregar aquesta plantilla de la funció Excel VBA Now aquí: plantilla de la funció VBA Now