Dieses Tutorial zeigt, wie Sie die CDec VBA-Funktion verwenden.
CDec-Funktion
VBA CDec Ausdruck in Dezimal umwandeln
Die VBA CDec-Funktion konvertiert einen Ausdruck in einen dezimalen Datentyp. Der Datentyp Dezimal ist eigentlich ein Untertyp des Datentyps Variant.
| 12345678910 | Unter CDecExample_1()MsgBox CDec(12.34000001)'Ergebnis ist: 12.34000001MsgBox CDec(10000000000012.3)'Ergebnis ist: 10000000000012.3MsgBox CDec(-0,00000000000001)'Ergebnis ist: -0,00000000000001MsgBox CDec(-12.34)'Ergebnis ist: -12.34End Sub |
VBA CDec Konvertieren von Strings in Dezimalzahlen
Die VBA-CDec-Funktion kann verwendet werden, um Zeichenfolgen in Dezimalzahlen umzuwandeln, wenn die Zeichen in der Zeichenfolge eine Bedeutung als Zahlen haben.
| 12345678910111213141516171819 | Unter CDecExample_2()Dim StrEx als StringStrEx = "112.112112"MsgBox CDec(StrEx)'Ergebnis ist: 112.112112StrEx = "112.3"MsgBox CDec(StrEx)'Ergebnis ist: 112,3StrEx = "11,2"MsgBox CDec(StrEx)'Ergebnis ist: 112 , wird ignoriertStrEx = "112,07 $"MsgBox CDec(StrEx)'Ergebnis ist: 112,07 $ wird ignoriertEnd Sub |
VBA-Programmierung | Code Generator arbeitet für Sie!
VBA-CDec-Laufzeitfehler 13 Typkonflikt
Die Verwendung der VBA-CDec-Funktion mit Zeichenfolgen, die nicht numerische Zeichen oder Zeichen enthalten, die im numerischen Kontext keine Bedeutung haben, führt zu einem Laufzeitfehler '13': Typkonflikt.
| 1234567 | Unter CDecExample_3()'Der folgende Code führt zu einer FEHLER-Meldung'CDec kann keine nicht numerischen Zeichen verarbeitenDim StrEx als StringStrEx = "Ab13"MsgBox CDec(StrEx)End Sub |
VBA-CDec-Laufzeitfehler 6 Überlauf
Die Verwendung der VBA-CDec-Funktion mit Zeichenfolgen, die zu einem Wert führen, der kleiner oder größer als die erwartete Dezimalzahl ist, führt zu einem Laufzeitfehler '6': Overflow. Eine Dezimalzahl sollte zwischen -7.9 E28 und +7.9 E28 liegen.
| 1234567 | Unter CDecExample_4()'Der folgende Code führt zu einer FEHLER-Meldung'CDec kann Zahlen zwischen -7,9 E28 und +7,9 E28 verarbeitenDim StrEx als VarianteStrEx = 8E+30MsgBox CDec(StrEx)End Sub |
Regionale VBA-CDec-Einstellungen
Die VBA CDec-Funktion hat ein anderes Verhalten beim Konvertieren von Zeichenfolgen mit Komma oder Punkt. Es verwendet die Ländereinstellungen des Betriebssystems für Dezimaltrennzeichen und Zifferntrennzeichen.
| 12345678910111213141516 | Unter CDecExample_5()Dim StrEx als StringStrEx = "1,0000009"MsgBox CDec(StrEx)'Wenn regionale Einstellungen haben, als Gruppierungstrennzeichen, dann'Ergebnis ist: 19'Wenn regionale Einstellungen als Dezimaltrennzeichen haben, dann'Ergebnis ist: 1.0000009StrEx = "1.0000009"MsgBox CDec(StrEx)'Wenn Regionaleinstellungen haben . als Gruppierungstrennzeichen dann'Ergebnis ist: 19'Wenn die Regionaleinstellungen . als Dezimaltrennzeichen dann'Ergebnis ist: 1.0000009End Sub |
