Funkce DatePart

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

Upozornění    Došlo k problému s používáním této funkce. Poslední pondělí v některých kalendářních letech může být uvedeno jako týden 53, kdy by mělo být týden 1. Pokud chcete získat další informace a alternativní řešení, přečtěte si informace v tématu funkce Format nebo DatePart pro poslední pondělí v roce.

Syntaxe

DatePart ( interval, datum [, první_den_v_týdnu] [, první_týden_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 typu variant (Date), kterou chcete vyhodnotit.

první_den_v_týdnu

Nepovinný argument. Konstanta, který určuje první den v týdnu. Pokud není zadaná, předpokládá se neděle.

první_týden_v_roce

Nepovinný argument. Konstanta, která určuje první týden v roce. Není-li zadáno, předpokládá se, že jde o týden, ve kterém nastane 1.

Nastavení

Argument interval obsahuje 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

Argument první_den_v_týdnu má tato nastavení:

Konstanta

Hodnota

Popis

vbUseSystem

0

Použijte nastavení rozhraní API 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_v_roce má tato nastavení:

Konstanta

Hodnota

Popis

vbUseSystem

0

Použijte nastavení rozhraní API NLS.

vbFirstJan1

1

Začíná týdnem, kdy dojde k 1.

vbFirstFourDays

2

Zahajte první týden, který má nejméně čtyři dny nového roku.

vbFirstFullWeek

3

Začněte s prvním celým týdnem v roce.

Poznámky

K vyhodnocení data a vrácení určitého časového intervalu můžete použít funkci DatePart . Pomocí funkce DatePart můžete například 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 "tt".

Pokud je dateLiterál typu datum, stane se zadaný rok trvalou součástí daného data. Pokud je však Datum uzavřené v uvozovkách ("") a vynecháte rok, bude do kódu vkládán aktuální rok pokaždé, když je vyhodnocen výraz data . To umožňuje psát kód, který se dá použít v různých letech.

Poznámka: Pokud je u nastavenívlastnosti Kalendář nastavena možnost 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 na jednotkách časového období aktuálního arabského kalendáře. Pokud je třeba aktuální kalendář hidžra a část data, která se má vrátit, je rok, hodnota roku je rok hidžra.

Příklady dotazů

Výraz

Výsledky

Vyberte DatePart ("yyyy", [DateofSale]) AS NewDate FROM ProductSales;

Vrátí "Year" hodnot kalendářních dat pole "DateofSale".

Vyberte DatePart ("q"; [DateofSale]) jako NewDate z ProductSales;

Vrátí ' čtvrtletí ' (na základě kalendářního roku) hodnot kalendářních dat pole "DateofSale".

Vyberte DatePart ("y"; [DateofSale]) jako NewDate z ProductSales;

Vrátí "den roku" (1 až 365) hodnot kalendářních dat pole "DateofSale".

Vyberte DatePart ("d"; [DateofSale]) jako NewDate z ProductSales;

Vrátí "den" hodnot kalendářních dat v poli "DateofSale".

Vyberte DatePart ("w"; [DateofSale]) jako NewDate z ProductSales;

Vrátí hodnotu "Weekday" (od 1 do 7, kde 1 představuje neděli) hodnot kalendářních dat pole "DateofSale".

Vyberte DatePart ("ww"; [DateofSale]) AS NewDate FROM ProductSales;

Vrátí hodnotu typu Week (od 1 do 52) hodnot kalendářních dat pole "DateofSale".

Vyberte DatePart ("h"; [DateTime]) AS NewDate FROM ProductSales;

Vrátí ' hodinu ' hodnot kalendářních dat v poli "DateTime".

Vyberte DatePart ("n"; [DateTime]) AS NewDate FROM ProductSales;

Vrátí hodnotu "minut" hodnot kalendářních dat v poli "DateTime".

Vyberte DatePart ("s"; [DateTime]) AS NewDate FROM ProductSales;

Vrátí ' 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 zabírá 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

Viz taky

Volba správné datové funkce

Potřebujete další pomoc?

Rozšiřte své dovednosti s Office
Projít školení
Získejte nové funkce jako první
Připojte se k účastníkům programu Office Insiders

Byly tyto informace užitečné?

Děkujeme vám za zpětnou vazbu.

Děkujeme vám za váš názor! Pravděpodobně bude užitečné, když vás spojíme s některým z našich agentů podpory Office.

×