Ovaj će vodič pokazati kako se koristi funkcija CDec VBA.
CDec funkcija
VBA CDec Pretvori izraz u decimalni
VBA CDec funkcija pretvara izraz u decimalni tip podataka. Decimalni tip podataka zapravo je podtip varijantnog tipa podataka.
12345678910 | Pod CDecExample_1 ()MsgBox CDec (12.34000001)'Rezultat je: 12.34000001MsgBox CDec (10000000000012.3)'Rezultat je: 10000000000012.3MsgBox CDec (-0,0000000000000001)'Rezultat je: -0.00000000000001MsgBox CDec (-12,34)'Rezultat je: -12,34Kraj podm |
VBA CDec Pretvaranje nizova u decimale
VBA CDec funkcija može se koristiti za pretvaranje nizova u decimale ako znakovi u nizu imaju značenje kao brojevi.
12345678910111213141516171819 | Pod CDecExample_2 ()Dim StrEx kao nizStrEx = "112.112112"MsgBox CDec (StrEx)'Rezultat je: 112.112112StrEx = "112.3"MsgBox CDec (StrEx)'Rezultat je: 112.3StrEx = "11,2"MsgBox CDec (StrEx)'Rezultat je: 112, zanemaruje seStrEx = "112,07 USD"MsgBox CDec (StrEx)'Rezultat je: 112,07 $ se zanemarujeKraj podm |
VBA programiranje | Generator koda radi za vas!
VBA CDec Greška tijekom izvođenja 13 Nepodudaranje vrste
Korištenje VBA CDec funkcije sa nizovima koji sadrže ne-numeričke znakove ili znakove koji nemaju značenje u numeričkom kontekstu rezultirat će pogreškom Run-Time '13': Neslaganje tipova.
1234567 | Pod CDec Primjer_3 ()'Donji kôd rezultirat će porukom ERROR'CDec ne može rukovati ne-brojčanim znakovimaDim StrEx kao nizStrEx = "Ab13"MsgBox CDec (StrEx)Kraj podm |
VBA CDec Pogreška tijekom izvođenja 6 Preljev
Korištenje VBA CDec funkcije sa nizovima koji rezultiraju vrijednošću manjom ili većom od očekivane decimalne vrijednosti rezultirat će pogreškom Run-Time '6': Overflow. Decimalni broj trebao bi biti između -7,9 E28 i +7,9 E28.
1234567 | Pod CDecExample_4 ()'Donji kôd rezultirat će porukom ERROR'CDec može rukovati brojevima između -7,9 E28 i +7,9 E28Dim StrEx kao varijantaStrEx = 8E+30MsgBox CDec (StrEx)Kraj podm |
VBA CDec regionalne postavke
VBA CDec funkcija ima različito ponašanje pretvarajući nizove zarezom ili točkom. Koristi regionalne postavke operacijskog sustava za decimalni separator i separator znamenki.
12345678910111213141516 | Pod CDecExample_5 ()Dim StrEx kao nizStrEx = "1,0000009"MsgBox CDec (StrEx)'Ako regionalne postavke imaju, onda kao separator grupiranja onda'Rezultat je: 19'Ako regionalne postavke imaju, kao decimalni razdjelnik onda'Rezultat je: 1.0000009StrEx = "1.0000009"MsgBox CDec (StrEx)'Ako regionalne postavke imaju. kao separator grupiranja tada'Rezultat je: 19'Ako regionalne postavke imaju. kao decimalni separator tada'Rezultat je: 1.0000009Kraj podm |