Funkcja DateAdd

Funkcja DateAdd zwaraca wartość typu Variant(Date) zawierającą datę powstałą przez dodanie do podanej daty określonego przedziału czasu.

Składnia funkcji DateAdd:

DateAdd (TypOkresu, LiczbaJednostek, Data)

Funkcja DateAdd ma trzy wymagane argumenty:
TypOkresu - (wymagane) wyrażenie tekstowe określające rodzaj dodawanego przedziału czasu.
LiczbaJednostek - (wymagane) wyrażenie numeryczne określające ilość dodawanych przedziałów czasowych (określonych przez TypOkresu). Znak tego wyrażenia określa, czy podane przedziały będą dodane do daty czy od niej odjęte.
Data (wymagana) Wyrażenie typu Variant(Date) lub literał określający datę, do której ma zostać dodany podany okres czasu.

Dostępne wartości określające TypOkresu:

Wartość	Opis
yyyy	Rok
q	Kwartał
m	Miesiąc
y	Dzień roku
d	Dzień
w	Dzień tygodnia
ww	Tydzień
h	Godzina
n	Minuta
s	Sekunda

Funkcji DateAdd należy używać, aby dodać lub odjąć określony przedział czasu od podanej daty. Np. można użyć funkcji DateAdd aby obliczyć datę 30 dni wcześniejszą od dzisiejszej lub czas 45 minut przed teraźniejszym.

Aby dodać do podanej daty określoną liczbę dni, można użyć Dnia roku ("y"), Dnia ("d") lub Dnia Tygodnia ("w") jako wartości wyrażenia TypOkresu.

Funkcja DateAdd zwraca tylko poprawne daty. Np. dodanie 1 miesiąca do dnia 31 styczeń 1995:

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

spowoduje zwócenie przez funkcję daty 28 Luty 1995 a nie 31 Luty 1995. Gdyby to miało wystąpić w roku przestępnym zwróca by została data 29 Luty.

Jeżeli obliczona data wykracza poza dopuszczalny zakres zostanie wygenerowany błąd.

Jeżeli LiczbaJednostek nie jest wartością typu Long, to zostanie zaokrąglona do najbliższej dopuszczalnej wartości.

Przykład użycia funkcji DateAdd:

Dim varNowaData As Variant
varNowaData=DateAdd("m",3,"31-1-95")
varNowaData=DateAdd("d",5,varNowaData) 'do daty 31 stycznia 1995 zostaną dodane 3 miesiące i 5 dni

(Zmienne i typy zmiennych zostały opisane w innych częściach kursu.)

na górę strony...