Funkce DatePart

Platí pro
Access pro Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Vrátí hodnotu typu Variant (Integer) obsahující zadanou část daného data.

Upozornění Došlo k problému s použitím této funkce. Poslední pondělí v některých kalendářních letech lze vrátit jako týden 53, kdy by to měl být týden 1. Další informace a alternativní řešení najdete v tématu Funkce Format nebo DatePart můžou vrátit nesprávné číslo týdne pro poslední pondělí v roce.

Syntaxe

DatePart(interval, datum [; první denofweek] [; první_týden_v_roce] )

Syntaxe funkce DatePart má tyto argumenty:

Argument Popis
interval Povinný argument. Řetězcový výraz, který je časový interval, který chcete vrátit.
Datum Povinný argument. Hodnota Variant (Date), kterou chcete vyhodnotit.
První_den_v_týdnu Nepovinný argument. Konstanta, která určuje první den v týdnu. Pokud není zadáno, předpokládá se neděle.
první týden v roce Nepovinný argument. Konstanta, která určuje první týden v roce. Pokud není zadán, předpokládá se, že prvním týdnem je týden, ve kterém nastane 1. leden.

Nastavení

Argument interval má tato nastavení:

Nastavení Popis
yyyy Rok
q Čtvrtletí
m Měsíc
y Den v roce
d Den
w Funkce Weekday
ww Týden
h Hodina
n Minuta
s Sekunda

Argument firstdayofweek má tato nastavení:

Konstantní Hodnota Popis
vbUseSystem 0 Použijte nastavení rozhraní API služby NLS.
vbSunday 1 Neděle (výchozí)
vbMonday 2 Pondělí
vbTuesday 3 Úterý
vbWednesday 4 Středa
vbThursday 5 Čtvrtek
vbFriday 6 Pátek
vbSaturday 7 Sobota

Argument první týden má tato nastavení:

Konstantní Hodnota Popis
vbUseSystem 0 Použijte nastavení rozhraní API služby NLS.
vbFirstJan1 1 Začněte týdnem, ve kterém nastane 1. leden (výchozí nastavení).
vbFirstFourDays 2 Začněte prvním týdnem, který má v novém roce alespoň čtyři dny.
vbFirstFullWeek 3 Začněte prvním celým týdnem v roce.

Poznámky

Funkci DatePart můžete použít k vyhodnocení data a vrácení určitého časového intervalu. Můžete například použít DatePart k výpočtu dne v týdnu nebo aktuální hodiny.

Argument firstdayofweek ovlivňuje výpočty, které používají symboly intervalu "w" a "ww".

Pokud je datum literálem kalendářního data, stane se zadaný rok trvalou součástí tohoto data. Pokud je však datum uzavřeno do dvojitých uvozovek (" ") a vynecháte rok, vloží se aktuální rok do kódu při každém vyhodnocení výrazu data . To umožňuje napsat kód, který se dá použít v různých letech.

Poznámka

Pokud jenastavení vlastnosti Calendar gregoriánské, musí být zadané datum gregoriánské. Pokud je kalendář Hidžra, musí být zadané datum Hidžra.

Vrácená část data je v jednotkách časového období aktuálního arabského kalendáře. Pokud je například aktuální kalendář Hidžra a vrácená část kalendářního data je rok, hodnota roku je hidžrský rok.

Příklady dotazů

Výraz Výsledky:
SELECT DatePart("yyyy";[DateofSale]) AS NewDate FROM ProductSales; Vrátí hodnotu Year hodnot kalendářních dat pole DateofSale.
SELECT DatePart("q";[DateofSale]) AS NewDate FROM ProductSales; Vrátí hodnotu čtvrtletí (na základě kalendářního roku) hodnot kalendářních dat v poli DateofSale.
SELECT DatePart("y";[DateofSale]) AS NewDate FROM ProductSales; Vrátí hodnotu "Day of Year" (1 až 365) hodnot kalendářních dat pole DateofSale.
SELECT DatePart("d";[DateofSale]) AS NewDate FROM ProductSales; Vrátí hodnotu "Day" hodnot kalendářních dat pole DateofSale.
SELECT DatePart("w";[DateofSale]) AS NewDate FROM ProductSales; Vrátí hodnotu "Weekday" (od 1 do 7, kde 1 představuje neděli) hodnot kalendářních dat pole DateofSale.
SELECT DatePart("ww";[DateofSale]) AS NewDate FROM ProductSales; Vrátí hodnotu "Číslo týdne" (od 1 do 52) hodnot kalendářních dat v poli DateofSale.
SELECT DatePart("h";[DateTime]) AS NewDate FROM ProductSales; Vrátí hodnotu "Hour" hodnot kalendářních dat v poli DateTime.
SELECT DatePart("n";[DateTime]) AS NewDate FROM ProductSales; Vrátí hodnotu minutes hodnot kalendářních dat v poli DateTime.
SELECT DatePart("s";[DateTime]) AS NewDate FROM ProductSales; Vrátí hodnotu sekund hodnot kalendářních dat v poli DateTime.

Příklad jazyka VBA

Poznámka

Následující příklady ukazují použití této funkce v modulu VBA (Visual Basic pro Applications). Pokud chcete další informace o práci s modulem VBA, vyberte Referenční informace pro vývojáře, které najdete v rozevíracím seznamu vedle položky Hledat a do vyhledávacího pole napište požadované pojmy.

Tento příklad vezme datum a pomocí funkce DatePart zobrazí čtvrtletí roku, ve kterém se vyskytuje.

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

Volba správné datové funkce