Visual Basic for Applications:
Beregning av en dato i fremtiden eller fortiden
Hvordan:
I Visual Basic for Applications (VBA) er den primære funksjonen som brukes til å beregne fremtidige eller fortidige datoer DateAdd()
. Denne funksjonen legger til et spesifisert tidsintervall til en dato, og returnerer en ny dato.
Her er et grunnleggende eksempel for å legge til 10 dager til dagens dato:
Dim fremtidigDato As Date
fremtidigDato = DateAdd("d", 10, Date) ' Legger til 10 dager til dagens dato
Debug.Print fremtidigDato ' Gir ut noe som: 04/20/2023
På samme måte, for å finne en dato 10 dager i fortiden:
Dim fortidDato As Date
fortidDato = DateAdd("d", -10, Date) ' Trekker fra 10 dager fra dagens dato
Debug.Print fortidDato ' Gir ut: 03/31/2023, antar at i dag er 04/10/2023
Disse eksemplene er ganske greie. Du kan erstatte "d"
med andre intervallkoder, som "m"
for måneder og "yyyy"
for år, for å beregne ulike typer datoberegninger. Slik kan du kanskje beregne en dato ett år i fremtiden:
Dim nesteÅr As Date
nesteÅr = DateAdd("yyyy", 1, Date) ' Legger til 1 år til dagens dato
Debug.Print nesteÅr ' Gir ut: 04/10/2024 hvis i dag er 04/10/2023
Dypdykk
DateAdd
-funksjonen har vært en grunnleggende del av VBA siden begynnelsen, og stammer fra sin forgjenger BASIC. Selv om den tilbyr enkelhet for å legge til eller trekke fra tidsintervaller fra datoer, er det viktig å merke seg at VBA, inkludert dets datohåndteringsfunksjoner, ikke alltid kan matche bekvemmeligheten eller effektiviteten som finnes i nyere programmeringsspråk.
For eksempel tilbyr moderne språk som Python med datetime
-modulen eller JavaScript med biblioteker som moment.js
og date-fns
, mer intuitive og kraftfulle måter for datomanipulering. Disse alternativene gir bedre støtte for lokalisering, tidssoner og skuddår, noe som kan gjøre dem mer egnet for applikasjoner som krever presis datoberegning på en global skala.
Men, for Excel-makroer og applikasjoner som krever integrering innen Microsoft Office-økosystemet, forblir VBA et praktisk valg. Enkelheten ved å direkte få tilgang til og manipulere Excel-data er en betydelig fordel. Videre, for de fleste grunnleggende datoberegninger som planlegging og påminnelser, gir DateAdd()
i VBA en adekvat og grei løsning. Dens syntaks er lett å forstå for nykommere, mens integreringen i de bredere Office-suite-applikasjonene sikrer dens relevans i spesifikke bruksområder.
I konklusjonen, selv om alternative programmeringsspråk kan tilby mer moderne tilnærminger til datoberegning, fungerer DateAdd()
i VBA som et vitnesbyrd om språkets varige kraft i domenene der det er mest nødvendig.