Vrátí hodnotu typu Variant (Integer) obsahující zadanou část daného data.
Upozornění Při použití této funkce došlo k problému. Poslední pondělí v některých kalendářních letech může být vráceno jako týden 53, kdy by měl být týden 1. Další informace a alternativní řešení najdete v článku Formátování nebo Funkce DatePart vracející špatné číslo týdne pro poslední pondělí v roce. |
Syntaxe
DatePart ( interval, datum [, první_den_v_týdnu] [, první_v_týdnu_v_roce] )
Syntaxe funkce DatePart obsahuje následující argumenty:
Argument |
Popis |
interval |
Povinný argument. Řetězcový výraz představující časový interval, který chcete vrátit. |
date |
Povinný argument. Hodnota variant(Date),kterou chcete vyhodnotit. |
firstdayofweek |
Nepovinný argument. Název Konstanta, který určuje první den v týdnu. Pokud není zadána, předpokládá se, že je to neděle. |
prvnítýdně v roce |
Nepovinný argument. Konstanta určující první týden v roce. Pokud není zadán, předpokládá se, že první týden je týden, do kterého se vyskytuje 1. leden. |
Nastavení
Argument interval má tato nastavení:
Nastavení |
Popis |
yyyy |
Rok |
q |
Čtvrtletí |
m |
Měsíc |
y |
Den roku |
d |
Den |
w |
Funkce Weekday |
ww |
Týden |
h |
Hodina |
n |
Minuta |
s |
Sekunda |
První_den_v_týdnu má tato nastavení:
Konstanta |
Hodnota |
Popis |
vbUseSystem |
0 |
Použijte nastavení rozhraní NLS API. |
vbSunday |
1 |
Neděle (výchozí) |
vbMonday |
2 |
Pondělí |
vbTuesday |
3 |
úterý |
vbWednesday |
4 |
Středa |
vb VisualSday |
5 |
Čtvrtek |
vbF poušty |
6 |
Pátek |
vbSaturday |
7 |
Sobota |
Prvnítýdně v roce obsahuje tato nastavení:
Konstanta |
Hodnota |
Popis |
vbUseSystem |
0 |
Použijte nastavení rozhraní NLS API. |
vbFirst Se1 |
1 |
Začněte týdnem, do kterého se vyskytuje 1. leden (výchozí nastavení). |
vbFirstFourDays |
2 |
Začněte prvním týdnem, který má v novém roce minimálně čtyři dny. |
vbFirstFullWeek |
3 |
Začněte prvním celým týdnem roku. |
Poznámky
Funkci DatePart můžete použít k vyhodnocení data a vrácení určitého časového intervalu. Pomocí funkce DatePart můžete třeba vypočítat den v týdnu nebo aktuální hodinu.
Argument první_den_v_týdnu ovlivňuje výpočty, které používají symboly intervalu "w" a "ww".
Pokud jedanáLiterál typu datum, stane se zadaný rok trvalou součástí tohoto data. Pokud je však datum uzavřeno v uvozovkách (" ") a tento rok vynutíte, vloží se aktuální rok do kódu při každém vyhodnocení výrazu data. Díky tomu je možné psát kód, který se může používat v různých letech.
Poznámka: Pokud jevlastnost Kalendář nastavená na gregoriánský kalendář, musí být zadaným datem gregoriánský kalendář. Pokud je kalendářem kalendář hidžra, musí být zadaným datem kalendář hidžra.
Vrácená část data je v jednotkách časového období aktuálního arabského kalendáře. Pokud je třeba aktuální kalendář kalendář hidžra a část s kalendářním datem, která se má vrátit, je rok, hodnota roku je rok hidžra.
Příklady dotazů
Výraz |
Výsledky |
SELECT DatePart("yyyy",[DateofSale]) AS NewDate FROM ProductSales; |
Vrátí hodnotu "Year" hodnot dat pole DateofSale. |
SELECT DatePart("q",[DateofSale]) AS NewDate FROM ProductSales; |
Vrátí hodnotu data pole DateofSale (podle kalendáře roku). |
SELECT DatePart("y",[DateofSale]) AS NewDate FROM ProductSales; |
Vrátí hodnotu "Den roku" (1 až 365) hodnot dat pole DateofSale. |
SELECT DatePart("d",[DateofSale]) AS NewDate FROM ProductSales; |
Vrátí hodnotu "Den" hodnot 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 dat pole DateofSale. |
SELECT DatePart("ww",[DateofSale]) AS NewDate FROM ProductSales; |
Vrátí číslo týdne (od 1 do 52) hodnot dat pole DateofSale. |
SELECT DatePart("h";[DateTime]) AS NewDate FROM ProductSales; |
Vrátí hodnotu "Hodina" hodnot dat pole DateTime. |
SELECT DatePart("n";[DateTime]) AS NewDate FROM ProductSales; |
Vrátí hodnotu minutes pro hodnoty dat pole DateTime. |
SELECT DatePart("s";[DateTime]) AS NewDate FROM ProductSales; |
Vrátí hodnotu v sekundách hodnot dat pole 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 používá 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