Funktionen DatePart

Gælder for
Access til Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Returnerer en variant (heltal), der indeholder den angivne del af en angiven dato.

Advarsel Der er et problem med brugen af denne funktion. Den sidste mandag i nogle kalenderår kan returneres som uge 53, hvor den skal være uge 1. Du kan finde flere oplysninger og en løsning under Format- eller DatePart-funktioner kan returnere forkert ugenummer for sidste mandag i året.

Syntaks

DatePart(interval, dato [, første dag i ugen] [, første uge i året] )

Syntaksen for funktionen DatePart har disse argumenter:

Argument Beskrivelse
interval Påkrævet. Strengudtryk, der er det tidsinterval, du vil returnere.
Dato Påkrævet. Variantværdi (dato), som du vil evaluere.
førsteugedag Valgfrit. En konstant, der angiver den første dag i ugen. Hvis andet ikke er angivet, antages dette at være søndag.
førsteuge Valgfrit. En konstant, der angiver den første uge i året. Hvis den ikke er angivet, forudsættes den første uge at være den uge, hvor den 1. januar forekommer.

Indstillinger

Argumentet interval har disse indstillinger:

Indstilling Beskrivelse
åååå År
k Kvartal
m Måned
y Dag i året
d Dag
w Ugedag
ww Uge
h Time
n Minut
s Sekund

Argumentet førsteugedag har disse indstillinger:

Konstant Værdi Beskrivelse
vbUseSystem 0 Brug indstillingen NLS API.
vbSunday 1 Søndag (standard)
vbMonday 2 Mandag
vbTuesday 3 Tirsdag
vbWednesday 4 Onsdag
vbThursday 5 Torsdag
vbFriday 6 Fredag
vbSaturday 7 Lørdag

Argumentet førsteuge i året har disse indstillinger:

Konstant Værdi Beskrivelse
vbUseSystem 0 Brug indstillingen NLS API.
vbFirstJan1 1 Start med uge, hvor 1 januar forekommer (standard).
vbFirstFourDays 2 Start med den første uge, der har mindst fire dage i det nye år.
vbFirstFullWeek 3 Start med den første hele uge i året.

Bemærkninger

Du kan bruge funktionen DatePart til at evaluere en dato og returnere et bestemt tidsinterval. Du kan f.eks. bruge DatePart til at beregne ugedagen eller den aktuelle time.

Argumentet førsteugedag påvirker beregninger, der bruger intervalsymbolerne "w" og "ww".

Hvis dato er en datokonstant, bliver det angivne år en permanent del af denne dato. Men hvis datoen er omsluttet af dobbelte anførselstegn (" "), og du udelader året, indsættes det aktuelle år i din kode, hver gang datoudtrykket evalueres. Det gør det muligt at skrive kode, der kan bruges i forskellige år.

Bemærk

For dato skal den angivne dato være gregoriansk, hvis egenskabsindstillingen Calendar er gregoriansk. Hvis kalenderen er hijri, skal den angivne dato være hijri.

Den returnerede datodel findes i tidsperiodeenhederne i den aktuelle arabiske kalender. Hvis den aktuelle kalender f.eks. er Hijri, og den datodel, der skal returneres, er året, er årsværdien et Hijri-år.

Forespørgselseksempler

Udtryk Resultater
SELECT DatePart("yyyy",[DateofSale]) AS NewDate FROM ProductSales; Returnerer 'Year' for datoværdierne i feltet "DateofSale".
SELECT DatePart("q",[DateofSale]) AS NewDate FROM ProductSales; Returnerer 'Kvartal' (baseret på kalenderår) for datoværdierne i feltet "DateofSale".
SELECT DatePart("y",[DateofSale]) AS NewDate FROM ProductSales; Returnerer 'Dag i året' (1 til 365) for datoværdierne i feltet "DateofSale".
SELECT DatePart("d",[DateofSale]) AS NewDate FROM ProductSales; Returnerer 'Dag' for datoværdierne i feltet "DateofSale".
SELECT DatePart("w",[DateofSale]) AS NewDate FROM ProductSales; Returnerer 'Ugedag' (fra 1 til 7, hvor 1 repræsenterer søndag) for datoværdierne i feltet "DateofSale".
SELECT DatePart("ww",[DateofSale]) AS NewDate FROM ProductSales; Returnerer 'Ugenummeret' (fra 1 til 52) for datoværdierne i feltet "DateofSale".
SELECT DatePart("h",[DateTime]) AS NewDate FROM ProductSales; Returnerer 'Time' for datoværdierne i feltet "DateTime".
SELECT DatePart("n",[DateTime]) AS NewDate FROM ProductSales; Returnerer 'Minutter' for datoværdierne i feltet "DateTime".
SELECT DatePart("s",[DateTime]) AS NewDate FROM ProductSales; Returnerer "sekunder" for datoværdierne i feltet "DateTime".

VBA-eksempel

Bemærk

Følgende eksempler demonstrerer brugen af denne funktion i et VBA-modul (Visual Basic for Applications). Hvis du vil have mere at vide om at arbejde med VBA, skal du vælge Udviklerreference på rullelisten ud for Søg og skrive ét eller flere ord i søgefeltet.

I dette eksempel bruges en dato, og ved hjælp af funktionen DatePart vises kvartalet i det år, hvor det forekommer.

Dim TheDate As Date    ' Declare variables.
Dim Msg    
TheDate = InputBox("Enter a date:")
Msg = "Quarter: " & DatePart("q", TheDate)
MsgBox Msg

Vælg den rigtige datofunktion