VBA Astăzi - Cum se folosește funcția Data în VBA pentru a găsi data de azi?

Funcția VBA Today

Today înseamnă data curentă, în foaia de lucru Funcția Now face același lucru care ne oferă data și ora curente, dar nu există nicio funcție incorporată astăzi în VBA însăși, metoda pentru a obține data curentă a sistemului este folosind funcția date și spre deosebire de funcția dată, funcția dată ne oferă doar data curentă.

În Excel, avem mai multe funcții utile care ne pot ajuta zilnic. Excel ne-a ușurat toată viața la locul de muncă. Când spun „zilnic”, Excel are formula pentru a returna și data de astăzi, nu numai data, putem obține împreună data și ora curente. Aceasta este varietatea formulelor Excel. Dacă sunteți un utilizator obișnuit de excel, sper că ați întâlnit formula numită „ASTĂZI” în excel pentru a insera data curentă ca afișată în computerul dvs. de lucru. Dar nu avem funcția TODAY în VBA, atunci cum obținem data de azi de la VBA. Acest articol vă va arăta cum să lucrați cu data de azi în VBA. Citește mai departe.

Care este Formula pentru a obține Data de azi în VBA?

Dacă nu există o formulă numită AZI, atunci cum obținem data de astăzi de la VBA? Aceasta este întrebarea comună pe care toată lumea o pune, dar soluția este simplă, avem o formulă cu un nume diferit, adică funcția DATE.

Ce funcție de dată are în VBA?

DATE este exact la fel ca funcția VBA TODAY, dar aceasta nu este o funcție volatilă decât dacă rulați macrocomanda sau declanșați macrocomanda.

Sintaxa funcției DATE nu are niciun argument. Trebuie doar să trecem funcția DATE. Asta e tot.

DATA ()

Exemple de funcție de dată în VBA

Funcția DATE pentru a reveni la data curentă a sistemului. Acest lucru este foarte util atunci când îl folosim ca parte a marelui proiect VBA. Pentru a avea cunoștințe corecte despre acest lucru mai întâi, vă voi arăta exemple simple de funcție DATE.

Exemplul nr. 1

Să creăm o funcție simplă DATE pentru a afișa data curentă în caseta de mesaj. Urmați pașii de mai jos pentru a scrie macro-ul Excel.

Pasul 1: Creați o subprocedură denumind macro-ul.

Pasul 2: declarați variabila drept „Data”. Funcția DATE returnează rezultatul doar ca dată, astfel încât tipul de date variabilă ar trebui să fie „Data”.

Cod:

Sub Today_Example1 () Dim K As String End Sub

Pasul 3: Atribuiți valoarea variabilei „k” ca funcție DATE .

Cod:

Sub Today_Example1 () Dim K As String K = Date End Sub

Pasul 4: Acum, valoarea variabilei „k” din caseta de mesaje din VBA .

Cod:

Sub Today_Example1 () Dim K As String K = Data MagBox K End Sub

Rulați codul. Ar trebui să vedem data curentă afișată în sistem.

Notă: formatul datei poate varia în funcție de setările sistemului. Poate fi în „mm-zz-aa”, „zz-mm-aa”.

Data Funcția pentru a găsi scadența este astăzi.

Funcția de dată este mai utilă în contextul identificării termenelor scadente ale EMI, plății cu cardul de credit, plăților de asigurare etc.

Să presupunem că lucrați ca ofițer de recuperare a împrumuturilor și că aveți o listă de clienți cu suma scadentă și data scadenței.

În coloana de stare, aveți nevoie de rezultat ca „Data scadentă este astăzi” dacă data scadenței este egală cu data curentă a sistemului.

Acest lucru se poate face folosind condiția IF și buclele în VBA. Mai jos este codul readymade pentru a ajunge la rezultate.

Cod:

Sub Today_Example2 () Dim K Ca întreg pentru K = 2 până la 11 Dacă celulele (K, 3). Valoare = Data, apoi celulele (K, 4). Valoare = "Data scadentă este astăzi" Celulele altele (K, 4). Valoare = „Nu astăzi” se încheie dacă următorul K se termină Sub

Aceasta va ajunge la rezultate în coloana de stare.

Astfel, în multe scenarii, putem folosi funcția DATE pentru a verifica datele și a efectua un fel de acțiune.

Puteți descărca această funcție VBA Today aici. Șablon Excel pentru funcția VBA Today

Articole interesante...