Funkce DateAdd

Vrátí hodnotu typu Variant (Date) obsahující datum, ke kterému je přidán zadaný časový interval.

Syntaxe

Funkce DateAdd(interval, číslo, datum)

Syntaxe funkce DateAdd obsahuje následující argumenty:

Argument

Popis

interval

Povinný argument. Řetězcový výraz představující časový interval, který chcete přidat.

Číslo:

Povinný argument. Číselný výraz s počtem intervalů, které chcete přidat. Může se jednat o kladné číslo (Chcete-li získat kalendářní data v budoucnosti) nebo záporné (abyste získali kalendářní data v minulosti).

date

Povinný argument. Typ variant (Date) nebo Literal představující datum, ke kterému se přidá interval.

Tip:  V Accessu 2010 má Tvůrce výrazů IntelliSense, takže vidíte, jaké argumenty váš výraz vyžaduje. 

Nastavení

Argumentintervalu 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

Poznámky

Pomocí funkce DateAdd můžete od data sčítat zadaný časový interval nebo ho odečíst. Pomocí funkce DateAdd můžete například vypočítat datum 30 dnů od aktuálního dne nebo čas 45 minut od nynějška.

Pokud chcete přidat dny k datu, můžete použít den v roce ("y"), den ("d") nebo Weekday ("w").

Funkce DateAdd nevrátí neplatné datum. Následující příklad přičte měsíc leden 31:

DateAdd("m", 1, "31-Jan-95")

V tomto případě vrátí funkce DateAdd 28. února – 95, ne 31. února 95. Pokud je Datum 31. ledna-96, vrátí se 29-únor-96, protože 1996 je přestupný rok.

Pokud by počítané datum představovalo před rokem 100 (to znamená, že odečtete více roků, než je Datum), dojde k chybě.

Pokud argument číslo není dlouhá, bude před vyhodnocením zaokrouhlen na nejbližší celé číslo.

Poznámka:  Formát vrácené hodnoty se určuje nastavením v Ovládacích panelech , nikoli podle formátu předaného v argumentu Datum .

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. Pokud jsou hodnoty měsíců názvy, musí být název konzistentní s nastavením vlastnosti aktuálního kalendáře . Pokud chcete minimalizovat možnost konfliktních názvů měsíců s nastavením vlastnosti aktuálního kalendáře , zadejte číselné hodnoty měsíců (krátký formát data).

Příklady dotazů

Výraz

Výsledky

Vyberte DateAdd ("YYYY", 1, [DateofSale]) jako Výraz1 FROM ProductSales.

Vrátí výsledek přidáním 1 roku k hodnotám kalendářních dat pole "DateofSale".

Vyberte DateAdd ("YYYY",-1, [DateofSale]) jako Výraz1 FROM ProductSales.

Vrátí výsledek odečtením 1 roku s datovými hodnotami pole "DateofSale".

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

Vrátí výsledek ve sloupci "NewDate" přidáním 10 dní k datovému datu pole "DateofSale".

Vyberte DateAdd ("ww",-1, [DateofSale]) jako NewDate z ProductSales;

Vrátí výsledek ve sloupci "NewDate" odečtením 1 týdne (7 dnů) od hodnot kalendářních dat pole "DateofSale".

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á jako vstup datum a pomocí funkce DateAdd zobrazí odpovídající datum v budoucnosti v zadaném počtu měsíců.

Dim FirstDate As Date    ' Declare variables.
Dim IntervalType As String
Dim Number As Integer
Dim Msg
IntervalType = "m" ' "m" specifies months as interval.
FirstDate = InputBox("Enter a date")
Number = InputBox("Enter number of months to add")
Msg = "New date: " & _
DateAdd(IntervalType, Number, FirstDate)
MsgBox Msg

Poznámka:  Tato stránka byla přeložena automaticky a může obsahovat gramatické chyby nebo nepřesnosti. Naším cílem je to, aby pro vás byl její obsah užitečný. Mohli byste nám prosím dát vědět, jestli vám informace pomohly? Pokud chcete, můžete se podívat na anglickou verzi článku.

Viz taky

Volba správné datové funkce

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.

×