Datumové Funkce
Date
Sekce “Date”Definice
Sekce “Definice”Funkce vrátí aktuální systémové datum.
Vzorec
Sekce “Vzorec”DateArgumenty
Sekce “Argumenty”Funkce nemá žádné vstupní argumenty.
Použití
Sekce “Použití”result = Date – Vrátí systémové datum
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = DateAdd(„m“, -1, Date) – Výstupem bude datum minulého měsíc stejného dne, jelikož pomocí funkce DateAdd se odečítá jeden měsíc od aktuálního data.
formattedDate = Format(Date, „dd-mm-yyyy“) – Výstupem bude jiný formát aktuálního dne ve formátu den-měsíc-rok.
result = Month(Date) – Extrakce pouze měsíce funkcí Month z dnešního data.
result = Year(Date) – Extrakce pouze roku funkcí Year z dnešního data.
result = Day(Date) – Extrakce pouze dne funkcí Day z dnešního data.
Cyklus pro vypsání stejného dnešního dne v každém měsíci 12 měsíců dozadu až po minulý měsíc do okna inmediate:
For i = -12 To -1
zk = DateAdd(„m“, i, Date)
Debug.Print zk
Next i
DateAdd
Sekce “DateAdd”Definice
Sekce “Definice”Funkce přidá nebo odečte určitý časový interval k zadanému datu.
Vzorec
Sekce “Vzorec”DateAdd(Interval, Number, Date)Argumenty
Sekce “Argumenty”Interval (povinné) – Řetězec označující interval dle následujících formátů:
| Formát intervalu | Popis formátu |
|---|---|
| yyyy | Rok |
| q | Čtvrtletí |
| m | Měsíc |
| y | Den v roce |
| d | Den |
| w | Den v týdnu |
| ww | Týden |
| h | Hodina |
| n | Minuta |
| s | Sekunda |
Number (povinné) – Počet datumových nebo časových intervalů, které mají být přidány (kladné číslo) nebo odečteny (záporné číslo).
Date (povinné) – Datum, ke kterému má být přidán nebo odečten interval.
Použití
Sekce “Použití”result = DateAdd(„m“, 1, „15.01.2025“) – Přidání jednoho měsíce k datu, výsledkem tak bude 15.2.2025.
result = DateAdd(„m“, -1, „15.01.2025“) – Odečtení jednoho měsíce od data, výsledkem tak bude 15.12.2024.
result = DateAdd(„m“, -3, „15.01.2025“) – Odečtení 3 měsíců od specifikovaného data.
result = DateAdd(„yyyy“, 1, „15.01.2025“) – Přičtení jednoho roku k specifikovanému datu. Výstupem bude stejný den a měsíc v následujícím roce.
result = DateAdd(„ww“, 1, „15.01.2025“) – Bude přidán jeden týden k datu 15.1.2025.
result = DateAdd(„h“, 1, „18:05:45“) – Přidání jedné hodiny ke specifikovanému času.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = DateAdd(„m“, -1, Date) – Výstupem bude datum minulého měsíc stejného dnešního dne, jelikož do funkce je přidána funkce Date, která vrací dnešní datum.
result = DateAdd(„n“, 10, Time) – Přidání 10 minut k aktuálnímu času, který je zjištěn funkcí Time.
result = Format(DateAdd(„m“, -1, Date), „yyyy-MM-dd“) – Formátování výstupu pomocí funkce Format na typ rok-měsíc-den, přičemž od aktuálního data zjištěného pomocí funkce Date je odečten jeden měsíc.
result = Month(DateAdd(„m“, -1, Date)) – Extrakce pouze měsíce funkcí Month z data, od kterého je odečten jeden měsíc.
result = Year(DateAdd(„m“, -1, Date)) – Extrakce pouze roku funkcí Year z data, od kterého je odečten jeden měsíc.
Cyklus pro vypsání stejného dnešního dne v každém měsíci 12 měsíců dozadu až po minulý měsíc do okna inmediate:
For i = -12 To -1
zk = DateAdd(„m“, i, Date)
Debug.Print zk
Next i
DateDiff
Sekce “DateDiff”Definice
Sekce “Definice”Funkce vrací rozdíl mezi dvěma daty v určitém časovém intervalu.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Pomocí funkce je možné stanovit, v jakém formátu má být výstup mezi rozdílem dat, zdali rozdíl roků, měsíců, týdnů, hodin a dalších datumových a časových intervalů. Funkce navíc počítá přesný počet intervalu a nedívá se na zbytek. Například pokud má být zjištěn rozdíl v měsících datumů 20.1.2025 a 15.2.2025 výsledkem bude 1 měsíc, ačkoliv se nejedná o celý měsíc, tedy funkce se již nedívá na počet dní. Stejné nastavení funguje i při času. Pokud má být zjištěn rozdíl času mezi 15:05:45 a 18:03:00 výsledkem budou 3 hodiny, ačkoliv se nejedná o celé 3 hodiny.
Vzorec
Sekce “Vzorec”DateDiff(Interval, Date1, Date2, [FirstDayOfWeek], [FirstWeekOfYear])Argumenty
Sekce “Argumenty”Interval (povinné) – Řetězec označující interval, ve kterém má být výstup (dny, měsíce…).
| Formát intervalu | Popis formátu |
|---|---|
| yyyy | Rok |
| q | Čtvrtletí |
| m | Měsíc |
| y | Den v roce |
| d | Den |
| w | Den v týdnu |
| ww | Týden |
| h | Hodina |
| n | Minuta |
| s | Sekunda |
Date1 (povinné) – První datum pro hledaný rozdíl.
Date2 (povinné) – Druhé datum pro hledaný rozdíl.
FirstDayOfWeek (volitelné, výchozí=vbSunday) – Konstantní hodnota označující jak má být nastaven první den v týdnu.
| VB Konstanta | Hodnota | Popis |
|---|---|---|
| vbUseSystem | 0 | Systémový den v týdnu |
| 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 |
FirstWeekOfYear (volitelné, výchozí=vbFirstJan1) – Konstantní hodnota označující jak má být nastaven první týden v roce v případě potřeby zjistit např. počet týdnů v roce s jinými než výchozími specifiky daného uživatele.
| VB Konstanta | Hodnota | Popis |
|---|---|---|
| vbUseSystem | 0 | Systémové nastavení |
| vbFirstJan1 | 1 | Týden, ve kterém se nachází 1. ledna. |
| vbFirstFourDays | 2 | První týden, který obsahuje alespoň 4 dny v týdnu. |
| vbFirstFullWeek | 3 | Prvním týdnem bude první celý týden (7 dní). |
Použití
Sekce “Použití”daysDiff = DateDiff(„d“, „1.1.2025“, „15.2.2025“) – Rozdíl mezi datumy ve dnech.
daysDiff = DateDiff(„m“, „1.1.2025“, „15.2.2025“) – Rozdíl mezi datumy v měsících.
daysDiff = DateDiff(„h“, „15:05:45“, „18:03:13“) – Rozdíl mezi časy v hodinách.
daysDiff = DateDiff(„ww“, „1.1.2025“, „1.1.2026“, vbThursday, vbFirstFullWeek) – Rozdíl v týdnech mezi daty s nastavením, že první den v týdnu má být čtvrtek a prvním týdnem v roce je první týden, který má všech 7 dní v daném roce. Výsledkem tak bude 53 týdnů.
daysDiff = DateDiff(„ww“, „1.1.2025“, „1.1.2026“, vbSunday, vbFirstFullWeek) – Rozdíl v týdnech mezi daty s nastavením, že první den v týdnu je neděle a prvním týdnem v roce je první týden, který má všech 7 dní v daném roce. Výsledkem bude 52 týdnů.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = DateDiff(„m“, Date, Date + 55) – Zjištění rozdílu datumů v měsících mezi dnešním datem zjištěným funkcí Date a připočtením 55 dní k dnešnímu datu.
result = DateDiff(„d“, Date, DateAdd(„m“, 1, Date)) – Zjištění rozdílu ve dnech mezi dnešním datem zjištěným funkcí Date a dnešním datem, ke kterému je přidán jeden měsíc funkcí DateAdd.
result = DateDiff(„h“, Time, DateAdd(„n“, 320, Time)) – Zjištění rozdílu v hodinách mezi aktuálním časem zjištěným funkcí Time a aktuálním časem, ke kterému je připočteno 320 minut pomocí funkce DateAdd.
DatePart
Sekce “DatePart”Definice
Sekce “Definice”Funkce vrací část data (např. rok, měsíc, den) nebo času jako celé číslo.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Funkce je univerzální funkcí pro extrakci datového nebo časového úseku ke specifickým funkcím jako Month, Year, Day, Hour a další datové a časové funkce, díky kterým je možné pouze extrahovat datum nebo čas dle své specifikace.
Vzorec
Sekce “Vzorec”DatePart(Interval, Date, [FirstDayOfWeek], [FirstWeekOfYear])Argumenty
Sekce “Argumenty”Interval (povinné) – Řetězec označující část data.
| Formát intervalu | Popis formátu |
|---|---|
| yyyy | Rok |
| q | Čtvrtletí |
| m | Měsíc |
| y | Den v roce |
| d | Den |
| w | Den v týdnu |
| ww | Týden |
| h | Hodina |
| n | Minuta |
| s | Sekunda |
Date (povinné) – Datum, ze kterého má být část data extrahována.
FirstDayOfWeek (volitelné, výchozí=vbSunday) – Konstantní hodnota označující první den v týdnu.
| VB Konstanta | Hodnota | Popis |
|---|---|---|
| vbUseSystem | 0 | Systémový den v týdnu |
| 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 |
FirstWeekOfYear (volitelné, výchozí= vbFirstJan1) – Konstantní hodnota označující první týden v roce v případě potřeby zjistit např. počet týdnů v roce s jinými než výchozími specifiky daného uživatele.
| VB Konstanta | Hodnota | Popis |
|---|---|---|
| vbUseSystem | 0 | Systémové nastavení |
| vbFirstJan1 | 1 | Týden, ve kterém se nachází 1. ledna. |
| vbFirstFourDays | 2 | První týden, který obsahuje alespoň 4 dny v týdnu. |
| vbFirstFullWeek | 3 | Prvním týdnem bude první celý týden (7 dní). |
Použití
Sekce “Použití”result = DatePart(„d“, „15.2.2025“) – Extrakce dne z datumu.
result = DatePart(„m“, „15.2.2025“) – Extrakce měsíce z datumu.
result = DatePart(„h“, „15:05:45“) – Extrakce hodiny z času.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = DatePart(„d“, Date) – Výstupem bude pouze dnešní den z dnešního data zjištěného funkcí Date.
result = DatePart(„n“, Time) – Výstupem bude pouze aktuální minuta z aktuálního času zjištěného funkcí Time.
result = DatePart(„m“, DateAdd(„m“, 1, Date)) – Extrakce příštího měsíce od dnešního data, jelikož k dnešnímu datu zjištěným funkcí Date je připočten jeden měsíc funkcí DateAdd.
DateSerial
Sekce “DateSerial”Definice
Sekce “Definice”Funkce vrací datum vytvořené z jednotlivých čísel roku, měsíce a dne.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Funkce se hodí v případě, kdy jsou např. v buňkách pouze čísla roku, měsíce a dne, ale nejsou spojené a navíc je potřebné ve VBA pracovat s celým datem, který je možné sestrojit pomocí této funkce.
Vzorec
Sekce “Vzorec”DateSerial(Year, Month, Day)Argumenty
Sekce “Argumenty”Year (povinné) – Rok.
Month (povinné) – Měsíc.
Day (povinné) – Den.
Použití
Sekce “Použití”specificDate = DateSerial(2025, 2, 15) – Vrátí datum z jednotlivých čísel. Výstupem tak bude 15.2.2025.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = Format(DateSerial(2025, 2, 15), „yyyy-MM-dd“) – Formátování složeného datumu pomocí funkce Format.
result = DateAdd(„d“, 30, DateSerial(2025, 1, 1)) – Přidání 30 dní k sestavenému datumu pomocí funkce DateAdd.
result = Weekday(DateSerial(2025, 2, 15)) – Zjištění čísla dne v týdnu funkcí Weekday ze složeného data.
result = DateSerial(2025, 2, Day(Date)) – Složení data pomocí zadaného roku a měsíce, přičemž den se mění dynamicky z aktuálního data zjištěného funkcí Date, ze kterého je extrahován pouze den funkcí Day. Podobně lze použít s měsícem funkcí Month a rokem funkcí Year.
DateValue
Sekce “DateValue”Definice
Sekce “Definice”Funkce převede textový řetězec na datový typ Date.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Funkce je vhodná v případě, kdy je získán datum, který je naformátovaný jako text a je potřebné ho převést na datum kvůli další práci s datovými funkcemi.
Vzorec
Sekce “Vzorec”DateValue(DateString)Argumenty
Sekce “Argumenty”DateString (povinné) – Textový řetězec obsahující datum.
Použití
Sekce “Použití”result = DateValue(„15.2.2025“) – Převod textového řetězce na datum.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = VarType(DateValue(„15.2.2025“)) – Ujištění, že se jedná skutečně o datový typ datumu pomocí funkce VarType.
result = DateDiff(„d“, DateValue(„01.01.2025“), Date) – Zjištění počtu dní mezi 2 daty funkcí DateDiff, přičemž první datum je formátováno jako textový řetězec, který musí být převeden na datum. Druhé datum je dnešní datum zjištěné funkcí Date.
Day
Sekce “Day”Definice
Sekce “Definice”Funkce vrací den v měsíci ze zadaného data.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Datum může být buď ve formátu textového řetězce nebo datového typu datum.
Vzorec
Sekce “Vzorec”Day(Date)Argumenty
Sekce “Argumenty”Date (povinné) – Datum, ze kterého má být den extrahován.
Použití
Sekce “Použití”result = Day(„15.2.2024“) – Extrahování dne z datumu, výstupem bude číslo 15.
result = Day(„2024-02-15“) – Extrahování dne z datumu v jiném formátu, výstupem bude 15.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = Day(Date) – Extrahování dne z dnešního datumu zjištěného funkcí Date.
result = Day(Now) – Extrahování dne z aktuálního data a času zjištěného funkcí Now.
result = DateSerial(2025, 2, Day(Date)) – Složení data funkcí DateSerial pomocí zadaného roku a měsíce, přičemž den se mění dynamicky z aktuálního data zjištěného funkcí Date.
result = Day(DateAdd(„d“, 14, Date)) – Extrakce dne z dnešního data zjištěného funkcí Date, ke kterému je připočteno 14 dní pomocí funkce DateAdd.
Month
Sekce “Month”Definice
Sekce “Definice”Funkce vrací měsíc ze zadaného data.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Datum může být buď ve formátu textového řetězce nebo datového typu datum.
Vzorec
Sekce “Vzorec”Month(Date)Argumenty
Sekce “Argumenty”Date (povinné) – Datum, ze kterého má být měsíc extrahován.
Použití
Sekce “Použití”result = Month(„15.2.2024“) – Extrahování měsíce z datumu, výstupem bude číslo 2.
result = Month(„2024-02-15“) – Extrahování měsíce z datumu v jiném formátu, výstupem je 2.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = Month(Date) – Extrahování měsíce z dnešního data zjištěného funkcí Date.
result = Month(Now) – Extrahování měsíce z aktuálního data a času zjištěného funkcí Now.
result = DateSerial(2025, Month(Date), 15) – Složení data funkcí DateSerial pomocí zadaného roku a dne, přičemž měsíc se mění dynamicky z aktuálního data zjištěného funkcí Date.
result = Month(DateAdd(„d“, 14, Date)) – Extrakce měsíce z dnešního data zjištěného funkcí Date, ke kterému je připočteno 14 dní pomocí funkce DateAdd.
MonthName
Sekce “MonthName”Definice
Sekce “Definice”Funkce vrací název měsíce ze zadaného čísla měsíce.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Výstupem bude text v systémovém jazyce Excelu. Pokud je Excel nastaven na český jazyk, výstupem bude celý název měsíce v češtině nebo zkratka v češtině.
Vzorec
Sekce “Vzorec”MonthName(Integer, [Abbreviate])Argumenty
Sekce “Argumenty”Integer (povinné) – Číslo měsíce (1 až 12).
Abbreviate (volitelné, výchozí=False) – Boolean, zda se má vrátit zkrácený název měsíce. Zkrácený název měsíce bude vrácen v případě, kdy je argument nastavený na True.
Použití
Sekce “Použití”result = MonthName(3) – Název 2. měsíce, výstupem bude „březen“.
result = MonthName(3, True) – Zkratka 2. měsíce, výstupem bude bře.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = MonthName(Month(Date)) – Extrahování názvu měsíce z dnešního data zjištěného funkcí Date, přičemž je nutné i extrahovat z dnešního data pouze měsíc funkcí Month.
result = MonthName(Month(Now)) – Extrahování měsíce z aktuálního data a času zjištěného funkcí Now, přičemž je nutné i extrahovat z dnešního data pouze měsíc funkcí Month.
result = MonthName(Month(DateAdd(„m“, 2, Date))) – Extrakce názvu měsíce z dnešního data zjištěného funkcí Date, ke kterému jsou připočteny 2 měsíce pomocí funkce DateAdd a z této funkce je daný měsíc extrahován funkcí Month.
Year
Sekce “Year”Definice
Sekce “Definice”Funkce vrací rok ze zadaného data.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Datum může být buď ve formátu textového řetězce nebo datového typu datum.
Vzorec
Sekce “Vzorec”Year(Date)Argumenty
Sekce “Argumenty”Date (povinné) – Datum, ze kterého má být rok extrahován.
Použití
Sekce “Použití”result = Year(„15.2.2024“) – Extrahování roku z datumu, výstupem bude číslo 2024.
result = Year(„2024-02-15“) – Extrahování roku z datumu v jiném formátu, výstupem je 2024.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = Year(Date) – Extrahování roku z dnešního data zjištěného funkcí Date.
result = Year(Now) – Extrahování roku z aktuálního data a času zjištěného funkcí Now.
result = DateSerial(Year(Date), 2, 15) – Složení data funkcí DateSerial pomocí zadaného měsíce a dne, přičemž rok se mění dynamicky z aktuálního data zjištěného funkcí Date.
result = Year(DateAdd(„m“, 14, Date)) – Extrakce roku z dnešního data zjištěného funkcí Date, ke kterému je připočteno 14 měsíců pomocí funkce DateAdd.
Hour
Sekce “Hour”Definice
Sekce “Definice”Funkce vrací hodinu ze zadaného času.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Čas může být buď ve formátu textového řetězce nebo datového typu čas. Výstupem je celé číslo.
Vzorec
Sekce “Vzorec”Hour(Time)Argumenty
Sekce “Argumenty”Time (povinné) – Čas, ze kterého má být hodina extrahována.
Použití
Sekce “Použití”result = Hour(„18:05:45“) – Extrahování hodiny z času, výstupem bude číslo 18.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = Hour(Time) – Extrahování hodiny z aktuálního času zjištěného funkcí Time.
result = Hour(Now) – Extrahování hodiny z aktuálního data a času zjištěného funkcí Now.
result = TimeSerial(Hour(Time), 5, 15) – Složení času funkcí TimeSerial pomocí zadané minuty a sekundy, přičemž hodina se mění dynamicky z aktuálního času zjištěného funkcí Time.
result = Hour(DateAdd(„n“, 30, Time)) – Extrakce hodiny z aktuálního času zjištěného funkcí Time, ke kterému je připočteno 30 minut pomocí funkce DateAdd.
Minute
Sekce “Minute”Definice
Sekce “Definice”Funkce vrací minutu ze zadaného času.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Čas může být buď ve formátu textového řetězce nebo datového typu čas. Výstupem je celé číslo.
Vzorec
Sekce “Vzorec”Minute(Time)Argumenty
Sekce “Argumenty”Time (povinné) – Čas, ze kterého má být minuta extrahována.
Použití
Sekce “Použití”result = Minute(„18:05:45“) – Extrahování minuty z času, výstupem bude číslo 5.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = Minute(Time) – Extrahování minuty z aktuálního času zjištěného funkcí Time.
result = Minute(Now) – Extrahování minuty z aktuálního data a času zjištěného funkcí Now.
result = TimeSerial(18, Minute(Time), 15) – Složení času funkcí TimeSerial pomocí zadané roku a sekundy, přičemž minuta se mění dynamicky z aktuálního času zjištěného funkcí Time.
result = Minute(DateAdd(„n“, 30, Time)) – Extrakce minuty z aktuálního času zjištěného funkcí Time, ke kterému je připočteno 30 minut pomocí funkce DateAdd.
Second
Sekce “Second”Definice
Sekce “Definice”Funkce vrací sekundu ze zadaného času.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Čas může být buď ve formátu textového řetězce nebo datového typu čas. Výstupem je celé číslo.
Vzorec
Sekce “Vzorec”Second(Time)Argumenty
Sekce “Argumenty”Time (povinné) – Čas, ze kterého má být sekunda extrahována.
Použití
Sekce “Použití”result = Second(„18:05:45“) – Extrahování sekundy z času, výstupem bude číslo 45.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = Second(Time) – Extrahování sekundy z aktuálního času zjištěného funkcí Time.
result = Second(Now) – Extrahování sekundy z aktuálního data a času zjištěného funkcí Now.
result = TimeSerial(18, 5, Second(Time)) – Složení času funkcí TimeSerial pomocí zadané hodiny a minuty, přičemž sekunda se mění dynamicky z aktuálního času zjištěného funkcí Time.
result = Second(DateAdd(„s“, 30, Time)) – Extrakce sekundy z aktuálního času zjištěného funkcí Time, ke kterému je připočteno 30 sekund pomocí funkce DateAdd.
Now
Sekce “Now”Definice
Sekce “Definice”Funkce vrátí aktuální datum a čas.
Vzorec
Sekce “Vzorec”NowArgumenty
Sekce “Argumenty”Funkce nemá žádné vstupní argumenty.
Použití
Sekce “Použití”result = Now – Vrátí systémové datum a čas.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = DateAdd(„n“, -1, Now) – Výstupem bude datum a čas, kdy je od aktuálního času odečtena jedna minuta pomocí funkce DateAdd.
formattedDate = Format(Date, „dd-mm-yyyy hh:mm:ss“) – Výstupem bude jiný formát aktuálního dne a času ve formátu den-měsíc-rok hodina:minuta:sekunda.
result = Month(Now) – Extrakce pouze měsíce funkcí Month z dnešního data a času.
result = Year(Now) – Extrakce pouze roku funkcí Year z dnešního data a času.
result = Day(Now) – Extrakce pouze dne funkcí Day z dnešního data a času.
result = Hour(Now) – Extrakce pouze hodiny funkcí Hour z dnešního data a času.
result = Minute(Now) – Extrakce pouze minuty funkcí Minute z dnešního data a času.
result = Second(Now) – Extrakce pouze sekundy funkcí Second z dnešního data a času.
Time
Sekce “Time”Definice
Sekce “Definice”Funkce vrátí aktuální čas.
vzorec
Sekce “vzorec”TimeArgumenty
Sekce “Argumenty”Funkce nemá žádné vstupní argumenty.
Použití
Sekce “Použití”result = Time – Vrátí systémový čas.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = DateAdd(„h“, -1, Time) – Výstupem bude aktuální čas, od kterého je odečtena jedna hodina pomocí funkce DateAdd.
formattedDate = Format(Time, „hh:mm“) – Výstupem bude jiný formát aktuálního času ve formátu hodina:minuta.
result = Hour(Time) – Extrakce pouze hodiny funkcí Hour z aktuálního času.
result = Minute(Time) – Extrakce pouze minuty funkcí Minute z aktuálního času.
result = Second(Time) – Extrakce pouze sekundy funkcí Second z aktuálního času.
TimeSerial
Sekce “TimeSerial”Definice
Sekce “Definice”Funkce vrací čas vytvořený z jednotlivých čísel hodiny, minuty a sekundy.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Funkce se hodí v případě, kdy jsou např. v buňkách pouze čísla hodin, minut a sekund, ale nejsou spojené a navíc je potřebné ve VBA pracovat s celým časem, který je možné sestrojit pomocí této funkce.
Vzorec
Sekce “Vzorec”TimeSerial(Hour, Minute, Second)Argumenty
Sekce “Argumenty”Hour (povinné) – Hodina (0–23).
Minute (povinné) – Minuta (0–59).
Second (povinné) – Sekunda (0–59)
Použití
Sekce “Použití”result = TimeSerial(22, 15, 30) – Vrátí čas z jednotlivých čísel. Výstupem tak bude 22:15:30.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = Format(TimeSerial(22, 15, 30), „hh-mm-ss“) – Formátování složeného datumu pomocí funkce Format.
result = DateAdd(„h“, 5, TimeSerial(22, 15, 30)) – Přidání 5 hodin k sestavenému času pomocí funkce DateAdd.
result = TimeSerial(18, 20, Second(Time)) – Složení času pomocí zadané hodiny a minuty, přičemž sekunda se mění dynamicky z aktuálního času zjištěného funkcí Time, ze kterého je extrahována pouze sekunda funkcí Second. Podobně lze použít s minutou funkcí Minute a hodinou funkcí Hour.
TimeValue
Sekce “TimeValue”Definice
Sekce “Definice”Funkce převede textový řetězec obsahující čas na datový typ Date.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Funkce je vhodná v případě, kdy je získán datum a čas nebo pouze čas, který je naformátovaný jako text a je potřebné ho převést na typ Date kvůli další práci s datovými a časovými funkcemi.
Vzorec
Sekce “Vzorec”TimeValue(TimeString)Argumenty
Sekce “Argumenty”TimeString (povinné) – Textový řetězec obsahující čas.
Použití
Sekce “Použití”result = TimeValue(„18:20:15“) – Převod textového řetězce na čas.
result = TimeValue(„18:20“) – Převod na čas s 0 sekundami, jelikož nejsou specifikovány v textovém řetězci.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = VarType(TimeValue(„18:20:15“))– Ujištění, že se jedná skutečně o datový typ datumu pomocí funkce VarType.
result = DateDiff(„h“, TimeValue(„18:20:15“), Time) – Zjištění počtu hodin mezi 2 časy funkcí DateDiff, přičemž první čas je formátován jako textový řetězec, který musí být převeden na čas. Druhý čas je aktuální čas zjištěný funkcí Time.
Weekday
Sekce “Weekday”Definice
Sekce “Definice”Funkce vrátí číslo dne v týdnu ze zadaného data.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Pomocí funkce lze navíc specifikovat, jaký den v týdnu má být nastaven jako první den v týdnu.
Vzorec
Sekce “Vzorec”Weekday(Date, [FirstDayOfWeek])Argumenty
Sekce “Argumenty”Date (povinné) – Datum, ze kterého má být získáno číslo dne v týdnu.
FirstDayOfWeek (volitelné, výchozí=vbSunday) – Konstantní hodnota označující první den v týdnu.
| VB Konstanta | Hodnota | Popis |
|---|---|---|
| vbUseSystem | 0 | Systémový den v týdnu |
| 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 |
Použití
Sekce “Použití”result = Weekday(„18.2.2025“)– Zjištění dne v týdnu ze zadaného data.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = Weekday(Date) – Zjištění dne v týdnu z dnešního data zjištěného funkcí Date.
result = Weekday(Now) – Zjištění dne v týdnu z dnešního data a času zjištěného funkcí Now.
result = Weekday(DateSerial(2025, 2, 15)) – Zjištění čísla dne v týdnu funkcí ze složeného data funkcí DateSerial.
WeekdayName
Sekce “WeekdayName”Definice
Sekce “Definice”Funkce vrátí název dne v týdnu na základě čísla dne.
Praktické vysvětlení
Sekce “Praktické vysvětlení”Výstupem bude text v systémovém jazyce Excelu. Pokud je Excel nastaven na český jazyk, výstupem bude celý název dne v týdnu v češtině nebo zkratka dne v týdnu v češtině.
Vzorec
Sekce “Vzorec”MonthName(Integer, [Abbreviate], [FirstDayOfWeek])Argumenty
Sekce “Argumenty”Integer (povinné) – Číslo dne v týdnu (1 až 7).
Abbreviate (volitelné, výchozí=False) – Boolean, zda se má vrátit zkrácený den v týdnu. Zkrácený den v týdnu bude vrácen v případě, kdy je argument nastavený na True.
FirstDayOfWeek (volitelné, výchozí=vbSunday) – Konstantní hodnota označující první den v týdnu.
| VB Konstanta | Hodnota | Popis |
|---|---|---|
| vbUseSystem | 0 | Systémový den v týdnu |
| 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 |
Použití
Sekce “Použití”result = WeekdayName(3) – 3. den v týdnu, výstupem bude „středa“.
result = WeekdayName (3, True) – Zkratka 3. dne v týdnu, výstupem bude „st“.
Použití s ostatními funkcemi
Sekce “Použití s ostatními funkcemi”result = WeekdayName (Weekday(Date)) – Extrahování názvu dne týdne z dnešního data zjištěného funkcí Date, přičemž je nutné i extrahovat z dnešního data pouze číslo dne v týdnu funkcí Weekday.
result = WeekdayName (Weekday(Now)) – Extrahování názvu dne týdne z aktuálního data a času zjištěného funkcí Now, přičemž je nutné i extrahovat z dnešního data pouze číslo dne v týdnu funkcí Weekday.
result = WeekdayName (Weekday(DateAdd(„m“, 2, Date))) – Extrakce názvu dne v týdnu z dnešního data zjištěného funkcí Date, ke kterému jsou připočteny 2 měsíce pomocí funkce DateAdd a z této funkce je dané číslo dne v týdnu extrahováno funkcí Weekday.
© 2026 Excelland
