Denne vejledning viser, hvordan du bruger CDec VBA -funktionen.
CDec -funktion
VBA CDec Konverter udtryk til decimal
VBA CDec -funktionen konverterer et udtryk til en decimal datatype. Decimal datatypen er faktisk en undertype af datatypen variant.
12345678910 | Sub CDecExample_1 ()MsgBox CDec (12.34000001)'Resultatet er: 12.34000001MsgBox CDec (10000000000012.3)'Resultatet er: 10000000000012.3MsgBox CDec (-0.00000000000001)'Resultatet er: -0.00000000000001MsgBox CDec (-12,34)'Resultatet er: -12,34Afslut Sub |
VBA CDec Konvertering af strenge til decimaler
VBA CDec -funktionen kan bruges til at konvertere strenge til decimaler, hvis tegnene i strengen har en betydning som tal.
12345678910111213141516171819 | Sub CDecExample_2 ()Dim StrEx som strengStrEx = "112.112112"MsgBox CDec (StrEx)'Resultatet er: 112.112112StrEx = "112,3"MsgBox CDec (StrEx)'Resultatet er: 112,3StrEx = "11,2"MsgBox CDec (StrEx)'Resultatet er: 112, ignoreresStrEx = "$ 112,07"MsgBox CDec (StrEx)'Resultatet er: 112,07 $ ignoreresAfslut Sub |
VBA -programmering | Kodegenerator virker for dig!
VBA CDec Run-Time Error 13 Type Mismatch
Brug af VBA CDec-funktion med strenge, der indeholder ikke-numeriske tegn eller tegn, der ikke har betydning i numerisk kontekst, vil resultere i en Run-Time-fejl '13': Type mismatch.
1234567 | Sub CDecExample_3 ()'Koden herunder vil resultere i en FEJL -meddelelse'CDec kan ikke håndtere ikke-numeriske tegnDim StrEx som strengStrEx = "Ab13"MsgBox CDec (StrEx)Afslut Sub |
VBA CDec Run-Time Error 6 Overflow
Brug af VBA CDec-funktion med strenge, der resulterer i en værdi, der er mindre eller større end den forventede decimal, vil resultere i en Run-Time-fejl '6': Overflow. Et decimaltal skal være mellem -7,9 E28 og +7,9 E28.
1234567 | Sub CDecExample_4 ()'Koden herunder vil resultere i en FEJL -meddelelse'CDec kan håndtere tal mellem -7,9 E28 og +7,9 E28Dim StrEx som variantStrEx = 8E+30MsgBox CDec (StrEx)Afslut Sub |
VBA CDec regionale indstillinger
VBA CDec -funktionen har forskellige adfærdskonverterende strenge med komma eller prik. Det bruger de regionale indstillinger i operativsystemet til decimalseparator og ciferseparator.
12345678910111213141516 | Sub CDecExample_5 ()Dim StrEx som strengStrEx = "1.0000009"MsgBox CDec (StrEx)'Hvis regionale indstillinger har, som en grupperingsadskiller derefter'Resultatet er: 19'Hvis regionale indstillinger har, som en decimalseparator derefter'Resultatet er: 1.0000009StrEx = "1.0000009"MsgBox CDec (StrEx)'Hvis regionale indstillinger har. som en gruppering separator derefter'Resultatet er: 19'Hvis regionale indstillinger har. som decimalseparator derefter'Resultatet er: 1.0000009Afslut Sub |