Funkcija DatePart

Vraća vrijednost Variant (Cijeli broj) koja sadrži određeni dio navedenog datuma.

Upozorenje Postoji problem s korištenjem te funkcije. Zadnji ponedjeljak u nekim kalendarskim godinama može se vratiti kao 53. tjedan, a trebao bi biti 1. tjedan. Dodatne informacije i zaobilazno rješenje potražite u članku Oblikovanje ili DatePart funkcije mogu vratiti pogrešan broj tjedna za zadnji ponedjeljak u godini.

Sintaksa

DatePart(interval, datum [, prvi_dan_u_tjednu] [, prvi_tjedan_u_godini] )

Sintaksa funkcije DatePart sadrži ove argumente:

Argument	Opis
interval	Obavezno. Nizovni izraz koji označava vremenski interval koji želite da bude vraćen.
Datum	Obavezno. Variant (datum) vrijednost koju želite vrednovati.
prvi_dan_u_tjednu	Neobavezno. Konstanta koja određuje prvi dan u tjednu. Ako nije određena, kao prvi dan u tjednu koristi se nedjelja.
prvi_tjedan_u_godini	Neobavezno. Konstanta koja određuje prvi tjedan u godini. Ako nije određena, kao prvi tjedan koristi se tjedan u kojem je 1. siječnja.

Postavke

Argument intervala ima sljedeće postavke:

Postavka	Opis
yyyy	Godina
q	Tromjesečje
m	Mjesec
y	Dan u godini
d	Dan
w	Weekday
ww	Tjedan
h	Sat
n	Minuta
s	Sekunda

Argument prvi_dan_u_tjednu ima sljedeće postavke:

Konstanta	Vrijednost	Opis
vbUseSystem	0	Koristite postavku NLS API-ja.
vbSunday	1	Nedjelja (zadano)
vbMonday	2	Ponedjeljak
vbutorak	3	utorak
vbSrijeda	4	Srijeda
vbčetvrtak	5	Četvrtak
vbpetak	6	Petak
vbSaturday	7	Subota

Argument prvi_tjedan_u_godini ima sljedeće postavke:

Konstanta	Vrijednost	Opis
vbUseSystem	0	Koristite postavku NLS API-ja.
vbFirstJan1	1	Počnite s tjednom u kojem je 1. siječnja (zadano).
vbFirstFourDays	2	Započnite s prvim tjednom koji ima najmanje četiri dana u novoj godini.
vbFirstFullWeek	3	Počnite s prvim punim tjednom u godini.

Napomene

Funkciju DatePart možete koristiti za procjenu datuma i vraćanje određenog vremenskog intervala. Možete, primjerice, koristiti DatePart za izračun dana u tjednu ili trenutnog sata.

Argument prvi_dan_u_tjednu utječe na izračune koji koriste simbole intervala "w" i "ww".

Ako je datum doslovni datum, navedena godina postaje trajni dio datuma. No ako datum upišete u dvostrukim navodnicima (" "), a izostavite godinu, trenutna godina bit će umetnuta u kod prilikom svakog izračuna datumskog izraza. To omogućuje pisanje koda koji se može koristiti u različitim godinama.

Vraćeni dio datuma nalazi se u jedinicama vremenskog razdoblja trenutnog arapskog kalendara. Na primjer, ako je trenutni kalendar Hidžri, a dio datuma koji će biti vraćen jest godina, vrijednost godine je godina Hidžri.

Primjeri upita

Izraz	Rezultati
SELECT DatePart("yyyy",[DateofSale]) AS NewDate FROM ProductSales;	Vraća "Godina" vrijednosti datuma polja "DatumProdaje".
SELECT DatePart("q",[DateofSale]) AS NewDate FROM ProductSales;	Vraća "Tromjesečje" (temeljeno na godini kalendara) vrijednosti datuma u polju "DatumProdaje".
SELECT DatePart("y";[DateofSale]) AS NewDate FROM ProductSales;	Vraća "Dan u godini" (od 1 do 365) vrijednosti datuma u polju "DatumProdaje".
SELECT DatePart("d";[DateofSale]) AS NewDate FROM ProductSales;	Vraća "Dan" vrijednosti datuma polja "DatumProdaje".
SELECT DatePart("w";[DateofSale]) AS NewDate FROM ProductSales;	Vraća "Dan u tjednu" (od 1 do 7, gdje 1 predstavlja nedjelju) vrijednosti datuma u polju "DatumProdaje".
SELECT DatePart("ww",[DateofSale]) AS NewDate FROM ProductSales;	Vraća "broj tjedna" (od 1 do 52) vrijednosti datuma u polju "DatumProdaje".
SELECT DatePart("h";[DateTime]) AS NewDate FROM ProductSales;	Vraća "Sat" vrijednosti datuma u polju "DatumVrijeme".
SELECT DatePart("n";[DateTime]) AS NewDate FROM ProductSales;	Vraća "Minute" vrijednosti datuma polja "DatumI vrijeme".
SELECT DatePart("s",[DateTime]) AS NewDate FROM ProductSales;	Vraća "sekunde" vrijednosti datuma polja "DatumVrijeme".

VBA primjer

U ovom se primjeru koristi datum i pomoću funkcije DatePart prikazuje tromjesečje u godini u kojem se pojavljuje datum.

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

Odabir odgovarajuće funkcije datuma