Funcția VBA Time | Examlpes pentru a utiliza funcția Excel VBA Time

Funcția de timp Excel VBA

Funcția VBA Time returnează ora curentă, de asemenea, este important să rețineți că această funcție nu are niciun argument în ea, un alt factor important de reținut este că această funcție returnează ora curentă a sistemului. Folosind această funcție putem găsi de fapt timpul efectiv luat de linia de coduri pentru a finaliza procesul.

TIMPUL este un fel de funcție volatilă, nu are nicio sintaxă.

Avem, de asemenea, o funcție similară în excel - funcția ACUM () care introduce atât ora curentă, cât și data curentă în foaia de calcul

TIMP ()

Trebuie doar să intrăm în funcție, de fapt, nu este nevoie de paranteză pentru a include doar TIMP pentru a insera ora curentă. Rezultatul dat de funcția TIME este în șir.

Cum se folosește funcția TIME în VBA?

Permiteți-mi să vă arăt exemplul unei funcții TIME simple în excel. Urmați pașii de mai jos pentru a crea cod pentru a utiliza funcția TIME.

Puteți descărca acest șablon de funcție de timp VBA aici - Șablon de funcție de timp VBA

Pasul 1: creați o macrocomandă.

Cod:

 Sub Time_Example1 () End Sub 

Pasul 2: declarați o variabilă ca Șir.

Cod:

 Sub Time_Example1 () Dim Current Current Time as String End Sub 

Pasul 3: Atribuiți o valoare acestei variabile prin funcția TIME.

Cod:

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

Pasul 4: Afișați acum rezultatul în caseta de mesaj.

Cod:

 Sub Time_Example1 () Dim CurrentTime as String CurrentTime = Time MsgBox CurrentTime End Sub 

Rulați acest cod folosind tasta F5 sau manual vom obține ora curentă.

Deci, când rulez acest cod, ora era 11.51.54 AM.

Alternativa funcției Now ()

Combinație de dată și oră ca alternativă la funcția ACUM

După cum am spus la începutul articolului ACUM, puteți introduce data și ora curente. Cu toate acestea, putem utiliza alte două funcții ca funcție alternativă la funcția ACUM, aceste două funcții sunt funcțiile VBA DATE și VBA TIME.

Data VBA va reveni la data curentă și Ora va reveni la ora curentă, deci aceasta face funcția ACUM. Mai jos este un set de cod care va insera data și ora curente în celula A1.

Cod:

 Sub Time_Example2 () Range ("A1"). Value = Date & "" & Time End Sub 

Acest cod va introduce data și ora curente în celula A1.

De asemenea, putem aplica un format acestor valori folosind funcția FORMAT. Codul de mai jos va formata data și ora.

Cod:

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

Acum rezultatul acestui cod este următorul.

Urmăriți înregistrările deschise ale cărții dvs. de lucru folosind funcția Time în VBA

De multe ori trebuie să cunoaștem frecvența de deschidere a registrului nostru de lucru. Există o situație în care deschidem registrul de lucru destul de des și facem unele modificări. Urmărind data și ora de deschidere a registrului de lucru, putem urmări ora de deschidere a registrului de lucru.

Creați o foaie nouă și redenumiți-o ca „Foaie de urmărire”.

Pasul 1: Faceți dublu clic pe acest registru de lucru din Editorul VBE.

Step 2: Select the workbook from the object drop-down list.

Step 3: As soon as you select this option you can see new macro automatically created by itself in the name “Workbook_Open()”.

Step 4: Inside this macro, we will need to write a code to track the workbook opening date & time.

I have already written code and below is the code for you.

Code:

 Private Sub Workbook_Open() Dim LR As Long LR = Sheets("Track Sheet").Cells(Rows.Count, 1).End(xlUp).Row + 1 Sheets("Track Sheet").Cells(LR, 1).Value = Date & " " & Time() Sheets("Track Sheet").Cells(LR, 1).NumberFormat = "dd-mmm-yyyy hh:mm:ss AM/PM" End Sub 

This will record your workbook opening times like the below one.