Tento tutoriál vám ukáže, ako používať funkciu CDec VBA.
Funkcia CDec
VBA CDec Konvertuje výraz na desatinné miesto
Funkcia VBA CDec prevádza výraz na desatinné dátové typy. Desiatkový dátový typ je v skutočnosti podtypom variantného dátového typu.
12345678910 | Sub CDecExample_1 ()MsgBox CDec (12.34000001)„Výsledok je: 12.34000001MsgBox CDec (10000000000012.3)„Výsledok je: 10000000000012.3MsgBox CDec (-0,0000000000000001)„Výsledok je: -0,0000000000000001MsgBox CDec (-12,34)„Výsledok je: -12,34Koniec pod |
VBA CDec Konvertovanie reťazcov na desatinné miesta
Funkciu VBA CDec je možné použiť na prevod reťazcov na desatinné miesta, ak majú znaky v reťazci význam ako čísla.
12345678910111213141516171819 | Sub CDecExample_2 ()Dim StrEx ako reťazecStrEx = "112.112112"MsgBox CDec (StrEx)„Výsledok je: 112.112112StrEx = "112,3"MsgBox CDec (StrEx)„Výsledok je: 112.3StrEx = "11,2"MsgBox CDec (StrEx)„Výsledok je: 112, sa ignorujeStrEx = "112,07 dolárov"MsgBox CDec (StrEx)„Výsledok je: 112,07 $ sa ignorujeKoniec pod |
Programovanie VBA | Generátor kódu pracuje za vás!
Chyba spustenia VBA CDec 13, nezhoda typu
Použitie funkcie VBA CDec so reťazcami, ktoré obsahujú nečíselné znaky alebo znaky, ktoré v číselnom kontexte nemajú význam, bude mať za následok chybu Run-Time ‘13’: Neshoda typu.
1234567 | Sub CDecExample_3 ()„Nasledujúci kód spôsobí chybovú správu„CDec nedokáže spracovať nečíselné znakyDim StrEx ako reťazecStrEx = "Ab13"MsgBox CDec (StrEx)Koniec pod |
Chyba pretečenia 6 chyby spustenia VBA CDec
Použitie funkcie VBA CDec so reťazcami, ktorých výsledkom je hodnota menšia alebo väčšia ako očakávané desatinné miesto, bude mať za následok chybu run-time ‘6’: Overflow. Desatinné číslo by malo byť medzi -7,9 E28 a +7,9 E28.
1234567 | Sub CDecExample_4 ()„Nasledujúci kód spôsobí chybovú správu„CDec dokáže spracovať čísla od -7,9 E28 do +7,9 E28Dim StrEx ako variantStrEx = 8E+30MsgBox CDec (StrEx)Koniec pod |
Regionálne nastavenia VBA CDec
Funkcia VBA CDec má rôzne reťazce na konverziu správania s čiarkou alebo bodkou. Na oddelenie desatinných miest a oddeľovač číslic používa regionálne nastavenia operačného systému.
12345678910111213141516 | Sub CDecExample_5 ()Dim StrEx ako reťazecStrEx = "1,0000009"MsgBox CDec (StrEx)„Ak to majú regionálne nastavenia, potom ako oddeľovač zoskupeníVýsledok je: 19„Ak to majú regionálne nastavenia, potom ako oddeľovač desatinných miest„Výsledok je: 1.0000009StrEx = "1,0000009"MsgBox CDec (StrEx)„Ak majú regionálne nastavenia. potom ako oddeľovač zoskupeníVýsledok je: 19„Ak majú regionálne nastavenia. potom ako oddeľovač desatinných miest„Výsledok je: 1.0000009Koniec pod |