VBA funkce
VBA funkce
Info! Na kompletním obsahu se pracuje!
| Název funkce | Popis | Návratová hodnota | Příklad | Výsledek |
|---|---|---|---|---|
| ASC | Vrací ASCII hodnotu znaku | Integer | Asc("a") | 97 |
| CHR | Vrací znak na základě ASCII hodnoty | String | Chr(97) | a |
| CONCATENATE | Spojí dva a více textových řetězců | String | CONCATENATE("Test","text") | "Test text" |
| FORMAT | Naformátuje hodnotu dle kódu | String | FORMAT("10,5","0.00") | 10,50 |
| INSTR | Vrací první pozici hledaného subtextu v textu | Long | Null | INSTR(1,"ABCDE","C") | 3 |
| INSTRREV | Vrací poslední možnou pozici hledaného subtextu v textu | Long | Null | INSTRREV("DDDDD","D",-1) | 5 |
| LCASE | Převede velká písmena na malá | String | Null | LCASE("ABC") | abc |
| LEFT | Vrátí zadaný počet znaků zleva | String | Null | LEFT("JACALISO s.r.o.",8) | JACALISO |
| LEN | Vrátí délku řetězce | Long | Null | LEN("ABCDEF") | 6 |
| LTRIM | Odstraní nadbytečné mezery v textu zleva | String | Null | LTRIM(" Jacaliso ") | "Jacaliso " |
| MID | Vrátí zadaný počet znaků od zadané pozice | String | Null | MID("JACALISO s.r.o.",4,3) | ALI |
| REPLACE | Využití pro nahrazení starého textu novým | String | Null | REPLACE("JACALISO s.r.o","A","E") | JECELISO s.r.o. |
| RIGHT | Vrátí zadaný počet znaků zprava | String | Null | RIGHT("JACALISO s.r.o.",6) | s.r.o. |
| RTRIM | Odstraní nadbytečné mezery v textu zprava | String | Null | RTRIM(" Jacaliso ") | " Jacaliso" |
| SPACE | Vrátí mezery v zadaném počtu | String | Null | SPACE(3) | " " |
| SPLIT | Rozdělí řetězec na sub-řetězce podle zadaného oddělovače | Strings Array | SPLIT("A B C D"," ") | {"A","B","C","D"} |
| STR | Převede číselnou hodnotu na text (pozor, číslo jen s desetinnou tečkou) | String | Null | STR(456.28) | " 456.28" |
| STRCOMP | Porovná dva textové řetězce (rozlišuje malá a velká písmena) | Integer | Null | STRCOMP("JACALISO", "jacaliso", 0) | -1 |
| STRCONV | Vrací text převedený na VELKÁ, malá, Velká2 nebo Unicode | String | Null | STRCONV("JACALISO", vbProperCase) | Jacaliso |
| STRREVERSE | Vrátí text v reverzním pořadí písmen | String | Null | STRREVERSE("Jacaliso") | osilacaJ |
| TRIM | Odstraní nadbytečné mezery v textu zprava i zleva | String | Null | TRIM(" Jacaliso ") | "Jacaliso" |
| UCASE | Převede malá písmena na velká | String | Null | UCASE("abc") | ABC |
| VAL | Převede textovou hodnotu na číslo | Long | Null | VAL("15 rohlíků") | 15 |
| Název funkce | Popis | Návratová hodnota | Příklad | Výsledek |
|---|---|---|---|---|
| DATE | Vrátí aktuální systémové datum v lokálním formátu | Date | DATE | 26.2.2017 |
| DATEADD | Vrátí datum pro zadaný posun | Date | DATEADD("yyyy", -1, "02/26/2017") | 26.2.2016 |
| DATEDIFF | Vrátí počet intervalů mezi dvěma daty | Integer | Null | DATEDIFF("m","24.12.2016","24.12.2017",2) | 12 |
| DATEPART | Vrátí část datumu dle zadaného kódu | Integer | Null | DATEPART("q","24.12.2017",2) | 4 |
| DATESERIAL | Vrátí datum pro zadanou kombinaci číselných hodnot | Date | DATESERIAL(2017,12,24) | 24.12.2017 |
| DATEVALUE | Převede textový řetězec představující datum na datum | Date | DATEVALUE("24.12.2017") | 24.12.2017 |
| DAY | Vrátí den pro zadané datum | Integer | Null | DAY("12/24/2017") | 24 |
| FORMAT | Naformátuje hodnotu dle kódu | String | FORMAT("24.12.2017","yy.mm.dd") | 17.12.24 |
| HOUR | Vrátí hodinu ze zadaného času | Integer | Null | HOUR("16:45:20") | 16 |
| MINUTE | Vrátí minutu ze zadaného času | Integer | Null | HOUR("16:45:20") | 45 |
| MONTH | Vrátí měsíc pro zadané datum | Integer | Null | MONTH("12/24/2017") | 12 |
| MONTHNAME | Vrátí název měsíce pro zadané číslo (1 - 12) | String | Null | MONTHNAME(12) | Prosinec |
| NOW | Vrátí aktuální datum a čas | Datetime | NOW | 26.2.2017 12:00:21 |
| TIMESERIAL | Vrátí čas pro zadanou kombinaci číselných hodnot | Datetime | TIMESERIAL(12,25,6) | 12:25:06 |
| TIMEVALUE | Převede textový řetězec představující čas na čas | Datetime | TIMEVALUE("12:25:06") | 12:25:06 |
| WEEKDAY | Vrátí číslo odpovídajícího dne v týdnu pro zadané datum | Integer | Null | WEEKDAY("24.12.2017", 2) | 7 |
| WEEKDAYNAME | Vrátí název dne v týdnu pro zadanou číselnou hodnotu | String | Null | WEEKDAYNAME(3, False, 2) | Středa |
| YEAR | Vrátí rok pro zadané datum | Integer | Null | YEAR("12/24/2017") | 2017 |
| Název funkce | Popis | Návratová hodnota | Příklad | Výsledek |
|---|---|---|---|---|
| ABS | Vrátí absolutní hodnotu čísla | Number | Null | ABS(-123,45) | 123,45 |
| ATN | Double | Atn(1) * 4 | 3,14159... | |
| COS | ||||
| EXP | ||||
| FIX | ||||
| FORMAT | ||||
| INT | Vrátí číslo v rozsahu Integer | Integer | INT(0.45) | 0 |
| LOG | ||||
| RANDOMIZE | ||||
| RND | Vrátí náhodné číslo od 0 do 1 | Single | RND | 0,81449 |
| SGN | ||||
| SIN | ||||
| SQR | ||||
| TAN |
| Název funkce | Popis | Návratová hodnota | Příklad | Výsledek |
|---|---|---|---|---|
| AND | Logická vazba AND (A zároveň) | Boolean | True And False | False |
| CASE | Funkce pro navrácení jedné z n hodnot | Variant | Select Case 2: Case 1: Debug.Print "One": Case 2: Debug.Print "Two": End Select | Two |
| FOR NEXT | Funkcionalita pro cyklycké opakování kódu | Variant | For i = 1 To 5 Step 1: Debug.Print i: Next i | 1, 2, 3, 4, 5 |
| IF THEN ELSE | Podmínková funkce Pokud - Pak - Jinak | Variant | If 2 > 1 Then "OK" :Else "NO" | OK |
| OR | Logická vazba OR (NEBO) | Boolean | True OR False | True |
| WHILE | Cykluj (do|po)kud není splněná podmínka | Variant | Do While i > 1: i = i - 1: Loop | 3x kód |
| Název funkce | Popis | Návratová hodnota | Příklad | Výsledek |
|---|---|---|---|---|
| ENVIRON | Vrací hodnotu ze systémového prostředí (např. lokální složky uživatele) | String | ENVIRON("APPDATA") | C:\Users\LogedUser\AppData\Roaming |
| ISDATE | Vrátí True pokud je testovaná hodnota datum, jinak vrátí False | Boolean | ISDATE(#12/24/2017#) | True |
| ISEMPTY | Vrátí True pokud je testovaná hodnota prázdná, jinak vrátí False | Boolean | ISEMPTY(Range("A1")) | True |
| ISERROR | Vrátí True pokud je testovaná hodnota chyba, jinak vrátí False | Boolean | ISERROR(Range("A1").Value) | True |
| ISNULL | Vrátí True pokud je testovaná hodnota Null, jinak vrátí False | Boolean | ISNULL(vMyVariable) | True |
| ISNUMERIC | Vrátí True pokud je testovaná hodnota číslem, jinak vrátí False | Boolean | ISNUMERIC(Range("A1").Value) | False |
| Název funkce | Popis | Návratová hodnota | Příklad | Výsledek | |||
|---|---|---|---|---|---|---|---|
| DDB | |||||||
| FV | |||||||
| IPMT | |||||||
| IRR | |||||||
| MIRR | |||||||
| NPER | |||||||
| NPV | |||||||
| PMT | |||||||
| PPMT | |||||||
| PV | |||||||
| RATE | |||||||
| SLN | |||||||
| SYD | |||||||
| Název funkce | Popis | Návratová hodnota | Příklad | Výsledek | |||
|---|---|---|---|---|---|---|---|
| CHDIR | |||||||
| CHDRIVE | |||||||
| CURDIR | |||||||
| DIR | |||||||
| FILEDATETIME | |||||||
| FILELEN | |||||||
| GETATTR | |||||||
| MKDIR | |||||||
| SETATTR | |||||||
| Název funkce | Popis | Návratová hodnota | Příklad | Výsledek |
|---|---|---|---|---|
| CBOOL | Převede hodnotu na Boolean | Boolean | CBOOL(1) | True |
| CBYTE | Převede číslo na typ Byte (1 - 255) | Byte | CBYTE(250.5) | 250 |
| CCUR | Currency | |||
| CDATE | Date | |||
| CDBL | Double | |||
| CDEC | Decimal | |||
| CINT | -32,768 to 32,767; fractions are rounded. | Integer | ||
| CLNG | -2,147,483,648 to 2,147,483,647; fractions are rounded. | Long | ||
| CSNG | -3.402823E38 to -1.401298E-45 for negative values; 1.401298E-45 to 3.402823E38 for positive values. | Single | ||
| CSTR | Návratové hodnoty CSTR | String | CSTR(#12/24/2017#) | "24.12.2017" |
| CVAR | Same range as Double for numerics. Same range as String for non-numerics. | Variant |
| Název funkce | Popis | Návratová hodnota | Příklad | Výsledek | |||
|---|---|---|---|---|---|---|---|
| CHOOSE | |||||||
| SWITCH | |||||||
Sub FunctionVBA()
Debug.Print Asc("a") 'Vrací ASCII hodnotu znaku
End Sub