Ovaj će vodič pokazati kako koristiti funkciju CDbl VBA za pretvaranje izraza u dvostruki tip podataka.
CDbl funkcija
VBA CDbl Pretvori izraz u cijeli broj
VBA CDbl funkcija može se koristiti za pretvaranje izraza u dvostruki tip podataka unutar VBA koda.
| 123456 | Pod CDblExample_1 ()MsgBox CDbl (12.345) 'Rezultat je: 12.345MsgBox CDbl (-124) 'Rezultat je: -124MsgBox CDbl (0.000034) 'Rezultat je: 0.000034MsgBox CDbl (-12.000034) 'Rezultat je: -12.000034Kraj podm |
VBA CDbl Pretvaranje niza u dvostruko
VBA CDbl funkcija može se koristiti za pretvaranje nizova u dvostruke ako znakovi u nizu imaju značenje brojeva.
| 123456789101112131415161718 | Pod CDblExample_2 ()Dim StrEx kao nizStrEx = "112"MsgBox CDbl (StrEx)'Rezultat je: 112StrEx = "0.0003"MsgBox CDbl (StrEx)'Rezultat je: 0.0003StrEx = "11,00002"MsgBox CDbl (StrEx)'Rezultat je: 1100002, zanemaruje seStrEx = "112 USD"MsgBox CDbl (StrEx)'Rezultat je: 112 $ se zanemarujeKraj podm |
VBA programiranje | Generator koda radi za vas!
VBA CDbl Greška tijekom izvođenja 13 Nepodudaranje vrste
Korištenje VBA CDbl 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 CDblExample_3 ()'Donji kôd rezultirat će porukom ERROR'CDbl ne može rukovati ne -brojčanim znakovimaDim StrEx kao nizStrEx = "Ab13"MsgBox CDbl (StrEx)Kraj podm |
VBA CDbl regionalne postavke
VBA CDbl funkcija ima različito ponašanje pretvarajući nizove sa zarezom ili točkom. Koristi regionalne postavke operacijskog sustava za decimalni separator i separator znamenki.
| 12345678910111213141516 | Sub CDblExample_4 ()Dim StrEx kao nizStrEx = "1,9"MsgBox CDbl (StrEx)'Ako regionalne postavke imaju, onda kao separator grupiranja onda'Rezultat je: 19'Ako regionalne postavke imaju, kao decimalni razdjelnik onda'Rezultat je: 1,9StrEx = "1,9"MsgBox CDbl (StrEx)'Ako regionalne postavke imaju. kao separator grupiranja tada'Rezultat je: 19'Ako regionalne postavke imaju. kao decimalni separator tada'Rezultat je: 1.9Kraj podm |
VBA CDbl Pretvaranje logičkih vrijednosti u dvojnike
VBA CDbl funkcija može pretvoriti logičke varijable u dvostruke. Ako je procijenjeni izraz istinit, dvostruki rezultat je -1, a ako je ocijenjeni izraz lažan, dobiveni dvostruki je 0.
| 12345678910 | Sub CDblExample_5 ()Dim BoolEx Kao BooleanBoolEx = IstinaMsgBox CDbl (BoolEx) 'Rezultat je: -1MsgBox CDbl (2 = 2) 'Rezultat je: -1BoolEx = NetačnoMsgBox CDbl (BoolEx) 'Rezultat je: 0MsgBox CDbl (1 = 2) 'Rezultat je: 0Kraj podm |
Umorni ste od traženja primjera VBA koda? Isprobajte AutoMacro!
VBA CDbl Pretvaranje datuma u parove
VBA CDbl funkcija može pretvoriti varijablu datuma u cijeli broj. Vraćena vrijednost je interni broj koji Excel koristi za zaokruživanje pohrane datuma.
| 123456789101112 | Pod CDbl Primjer_6 ()Dim DateEx As DateDatumEx = #2/3/1940 #MsgBox CDbl (DateEx)'Rezultat je: 14644DatumEx = #8.7. 1964 22:41:00 PM #MsgBox CDbl (DateEx)'Rezultat je: 23596.9451388889DatumEx = #3/7/1934 11:32:04 AM #MsgBox CDbl (DateEx)'Rezultat je: 12485.4806018519Kraj podm |
