Funció de temps VBA | Exemples per utilitzar la funció de temps Excel VBA

Funció de temps Excel VBA

Temps VBAFunció retorna l'hora actual, també l'important a tenir en compte és que aquesta funció no té cap argument, un altre factor important a recordar és que aquesta funció retorna l'hora actual del sistema. Utilitzant aquesta funció, podem trobar el temps real realitzat per la línia de codis per completar el procés.

TIME és una mena de funció volàtil, que no té cap sintaxi.

També tenim una funció similar a la funció Excel: NOW () que insereix tant el temps actual com la data actual al full de càlcul

TEMPS ()

Només hem d’entrar a la funció, de fet, no és suficient el parèntesi per incloure TIME només és suficient per inserir l’hora actual. El resultat donat per la funció TIME es troba a la cadena.

Com s'utilitza la funció TIME a VBA?

Deixeu-me mostrar l’exemple d’una funció TIME simple en excel. Seguiu els passos següents per crear codi per utilitzar la funció TIME.

Podeu descarregar aquesta plantilla de funció de temps VBA aquí: plantilla de funció de temps VBA

Pas 1: Creeu una macro.

Codi:

 Sub Hora_Exemple1 () Final Sub 

Pas 2: Declareu una variable com a Cadena.

Codi:

 Sub Time_Example1 () Atenueu Current Time com a final de cadena Sub 

Pas 3: Assigneu un valor a aquesta variable mitjançant la funció TIME.

Codi:

 Sub Time_Example1 () Dim Time Current As String CurrentTime = Time End Sub 

Pas 4: Ara mostreu el resultat al quadre de missatges.

Codi:

 Sub Time_Example1 () Dim Current Current Time As String CurrentTime = Time MsgBox CurrentTime End Sub 

Executeu aquest codi amb la tecla F5 o manualment obtindrem l’hora actual.

Per tant, quan vaig executar aquest codi, el temps era de 11.51.54 AM.

Alternativa de la funció Now ()

Combinació de data i hora com a alternativa a la funció ARA

Com he dit al principi de l'article ARA, podeu inserir la data i l'hora actuals. No obstant això, podem utilitzar altres dues funcions com a funció alternativa a la funció NOW, aquestes dues funcions són funcions VBA DATE i VBA TIME.

VBA Date retornarà la data actual i l’hora tornarà l’hora actual, de manera que això fa que la funció ARA. A continuació es mostra un conjunt de codi que inserirà la data i hora actuals a la cel·la A1.

Codi:

 SubHora_Exemple2 () Interval ("A1"). Valor = Data & "" i Finalització de l'hora Sub 

Aquest codi inserirà la data i hora actuals a la cel·la A1.

També podem aplicar un format a aquests valors mitjançant la funció FORMAT. El codi següent formatarà la data i l'hora.

Codi:

 Sub Time_Example2 () Range ("A1"). Value = Date & "" & Time Range ("A1"). NumberFormat = "dd-mmm-aaaa hh: mm: ss AM / PM" End Sub 

Ara el resultat d’aquest codi és el següent.

Feu un seguiment del registre de treballs oberts mitjançant la funció Time a VBA

Sovint necessitem conèixer la freqüència horària d'obertura del nostre llibre de treball. Hi ha una situació en què obrim el llibre de treball amb força freqüència i fem alguns canvis. Seguint l’hora i la data d’obertura del llibre, podem fer un seguiment de l’hora d’obertura del llibre.

Creeu un full nou i canvieu-lo pel nom de "Full de seguiment".

Pas 1: Feu doble clic a Aquest llibre de treball de VBE Editor.

Pas 2: Seleccioneu el llibre de treball a la llista desplegable d'objectes.

Pas 3: Tan bon punt seleccioneu aquesta opció, podreu veure una nova macro creada automàticament per ella mateixa al nom "Workbook_Open ()".

Pas 4: Dins d’aquesta macro, haurem d’escriure un codi per fer un seguiment de la data i hora d’obertura del llibre.

Ja he escrit codi i a continuació es mostra el codi per a vosaltres.

Codi:

 Private Sub Workbook_Open () Dim LR As Long LR = Fulls ("Full de seguiment"). Cel·les (files.Compte, 1). Final (xlUp). Fila + 1 fulls ("Full de seguiment"). Cel·les (LR, 1) .Value = Data i "" & Hora () Fulls de càlcul ("Full de seguiment"). Cel·les (LR, 1) .NumberFormat = "dd-mmm-aaaa hh: mm: ss AM / PM" End Sub 

Això enregistrarà els horaris d'obertura del vostre llibre de treball com el següent.