Ta vadnica bo pokazala, kako uporabiti funkcijo CDbl VBA za pretvorbo izrazov v dvojni tip podatkov.
Funkcija CDbl
VBA CDbl Pretvori izraz v celo število
Funkcijo VBA CDbl lahko uporabite za pretvorbo izrazov v dvojni podatkovni tip znotraj kode VBA.
| 123456 | Sub 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.000034End Sub |
VBA CDbl Pretvarjanje niza v dvojno
Funkcijo VBA CDbl lahko uporabite za pretvorbo nizov v dvojnike, če imajo znaki v nizu pomen kot številke.
| 123456789101112131415161718 | Sub CDblExample_2 ()Dim StrEx kot 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, je prezrtStrEx = "112 USD"MsgBox CDbl (StrEx)"Rezultat je: 112 $ se ne upoštevaEnd Sub |
Programiranje VBA | Generator kod deluje za vas!
VBA CDbl Napaka med izvajanjem 13 Neujemanje vrste
Uporaba funkcije VBA CDbl z nizi, ki vsebujejo neštevilčne znake ali znake, ki v numeričnem kontekstu nimajo pomena, bo povzročila napako med izvajanjem '13': Neskladje vrste.
| 1234567 | Sub CDblExample_3 ()'Spodnja koda bo povzročila sporočilo o NAPAKI'CDbl ne zmore obravnavati neštevilskih znakovDim StrEx kot nizStrEx = "Ab13"MsgBox CDbl (StrEx)End Sub |
VBA CDbl regionalne nastavitve
Funkcija VBA CDbl ima različne vedenjske pretvorbe nizov z vejico ali piko. Uporablja regionalne nastavitve operacijskega sistema za ločilo decimalk in ločil številk.
| 12345678910111213141516 | Sub CDblExample_4 ()Dim StrEx kot nizStrEx = "1,9"MsgBox CDbl (StrEx)'Če imajo regionalne nastavitve, potem ločilo za združevanje v skupine"Rezultat je: 19'Če imajo regionalne nastavitve, potem kot decimalni ločilo"Rezultat je: 1,9StrEx = "1,9"MsgBox CDbl (StrEx)"Če imajo regionalne nastavitve. kot ločevalnik skupin"Rezultat je: 19"Če imajo regionalne nastavitve. kot decimalni ločilo"Rezultat je: 1.9End Sub |
VBA CDbl Pretvarjanje logičnih vrednosti v dvojice
Funkcija VBA CDbl lahko pretvori logične spremenljivke v dvojnike. Če je ocenjeni izraz resničen, je dobljeni dvojnik -1 in če je ovrednoten izraz napačen, je dobljeni dvojnik 0.
| 12345678910 | Sub CDblExample_5 ()Zatemni BoolEx kot BooleanBoolEx = ResMsgBox CDbl (BoolEx) 'Rezultat je: -1MsgBox CDbl (2 = 2) 'Rezultat je: -1BoolEx = NapačnoMsgBox CDbl (BoolEx) 'Rezultat je: 0MsgBox CDbl (1 = 2) 'Rezultat je: 0End Sub |
Utrujen od iskanja primerov kode VBA? Preizkusite AutoMacro!
VBA CDbl Pretvarjanje datumov v dvojice
VBA CDbl funkcija lahko pretvori spremenljivko datuma v celo število. Vrnjena vrednost je interna številka, ki jo Excel uporablja za zaokrožitev shranjevanja datumov.
| 123456789101112 | Sub CDblExample_6 ()Zatemni DateEx kot datumDateEx = #2/3/1940 #MsgBox CDbl (DateEx)"Rezultat je: 14644DatumEx = #8/7/1964 22:41:00 PM #MsgBox CDbl (DateEx)"Rezultat je: 23596.9451388889DateEx = #3/7/1934 11:32:04 AM #MsgBox CDbl (DateEx)"Rezultat je: 12485.4806018519End Sub |
