VBA Today-funksjon
I dag betyr gjeldende dato, i regnearket Nå gjør funksjonen det samme som gir oss gjeldende dato og klokkeslett, men det er ingen innebygd dagsfunksjon i selve VBA, metoden for å få dagens dato for systemet er ved å bruke datofunksjonen og i motsetning til nå funksjon dato funksjon gir oss bare den nåværende datoen.
I Excel har vi flere nyttige funksjoner som kan hjelpe oss på daglig basis. Excel gjorde hele livet vårt enkelt på arbeidsplassen. Når jeg sier "daglig", har excel formelen for å returnere dagens dato også, ikke bare dato, vi kan også få gjeldende dato og tid sammen. Slik er mangfoldet av excelformler. Hvis du er en vanlig bruker av excel, håper jeg at du har kommet over formelen kalt “I DAG” i excel for å sette inn den gjeldende datoen som vist på din datamaskin. Men vi har ikke DAGS-funksjon i VBA, hvordan får vi DAGENS dato fra VBA. Denne artikkelen vil vise deg hvordan du kan jobbe med DAGS-datoen i VBA. Les videre.
Hva er formelen for å få dagens dato i VBA?
Hvis det ikke er noen formel som heter I DAG, hvordan får vi dagens dato fra VBA? Dette er det vanlige spørsmålet alle stiller, men løsningen er enkel, vi har en formel med et annet navn, dvs. DATE-funksjon.
Hvilken datofunksjon gjør i VBA?
DATE er nøyaktig den samme som VBA TODAY-funksjonen, men dette er ikke en flyktig funksjon med mindre du kjører makroen eller utløser makroen.
Syntaksen til DATE-funksjonen har ingen argumenter. Vi trenger bare å passere funksjonen DATE. Det er alt.
DATO ()
Eksempler på datofunksjon i VBA
DATE-funksjon for å returnere gjeldende dato for systemet. Dette er veldig nyttig når vi bruker dette som en del av det store VBA-prosjektet. For å ha god kunnskap om dette først, vil jeg vise deg enkle eksempler på DATE-funksjon.
Eksempel 1
La oss lage en enkel DATE-funksjon for å vise gjeldende dato i meldingsboksen. Følg trinnene nedenfor for å skrive excel-makroen.
Trinn 1: Opprett en underprosedyre ved å navngi makroen.
Trinn 2: Erklær variabelen som "Dato". DATO-funksjonen returnerer bare resultatet som dato, så den variable datatypen skal være "Dato".
Kode:
Sub Today_Example1 () Dim K Som String End Sub
Trinn 3: Tilordne verdien til variabelen “k” som DATE-funksjon .
Kode:
Sub Today_Example1 () Dim K Som String K = Date End Sub
Trinn 4: Nå, verdien av variabelen “k” i meldingsboksen i VBA .
Kode:
Sub Today_Example1 () Dim K Som String K = Date MagBox K End Sub
Kjør koden. Vi bør se gjeldende dato i systemet.
Merk: Datoformat kan variere avhengig av systeminnstillingene. Det kan være i "mm-dd-åå", "dd-mm-åå."
Datofunksjon for å finne forfall er i dag.
Datofunksjonen er mer nyttig i sammenheng med å finne forfallsdato for EMI, kredittkortbetaling, forsikringsbetaling osv. …
Anta at du jobber som låneansvarlig, og at du har en liste over kunder med forfallsbeløp og forfallsdato.
I statuskolonnen trenger du resultatet som "Forfall er i dag" hvis forfallsdato er lik gjeldende systemdato.
Dette kan gjøres ved å bruke IF-tilstanden og sløyfene i VBA. Nedenfor er den ferdige koden for å komme til resultatene.
Kode:
Sub Today_Example2 () Dim K som et heltall for K = 2 til 11 Hvis celler (K, 3) .Value = Dato Da celler (K, 4) .Value = "Forfall er i dag" Ellers celler (K, 4) .Value = "Ikke i dag" slutt hvis neste K slutt sub
Dette vil komme til resultatene i statuskolonnen.
Som dette i mange scenarier, kan vi bruke DATE-funksjonen til å sjekke datoene og utføre en slags handling.
Du kan laste ned denne VBA Today-funksjonen her. VBA Today-funksjon Excel-mal
