So konvertieren sie einen string in vba in einen double-string (mit beispielen)

Mit der CDbl- Funktion in VBA können Sie eine Textzeichenfolge in einen Double-Datentyp konvertieren.

Hier ist eine gängige Methode, diese Funktion in der Praxis zu verwenden:

 Sub ConvertStringToDouble()

    Dim i As Integer

    For i = 2 To 11
        If IsNumeric(Range(" A " & i)) Then
            Range(" B " & i) = CDbl(Range(" A " & i))
        Else
            Range(" B " & i) = 0
        End If
    Next i

End Sub

Dieses spezielle Makro konvertiert jeden String im Bereich A2:A11 nur dann in einen Double-Datentyp, wenn es sich bei dem String um eine Zahl handelt.

Andernfalls wird die Zeichenfolge in einen Nullwert konvertiert.

Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.

Beispiel: Konvertieren Sie einen String in Double in VBA

Nehmen wir an, wir haben die folgende Wertespalte in Excel, derzeit als Textzeichenfolgen formatiert:

Angenommen, wir möchten jede Zeichenfolge nur dann in einen Double-Datentyp konvertieren, wenn die Zeichenfolge eine Zahl ist , und diese in Spalte B anzeigen.

Dazu können wir das folgende Makro erstellen:

 Sub ConvertStringToDouble()

    Dim i As Integer

    For i = 2 To 11
        If IsNumeric(Range(" A " & i)) Then
            Range(" B " & i) = CDbl(Range(" A " & i))
        Else
            Range(" B " & i) = 0
        End If
    Next i

End Sub

Wenn wir dieses Makro ausführen, erhalten wir die folgende Ausgabe:

Beachten Sie, dass nur Textzeichenfolgen in Spalte A, die Zahlen sind, in Spalte B in Double-Datentypen konvertiert werden.

Andernfalls werden Textzeichenfolgen einfach in einen Nullwert konvertiert.

Hinweis : Die vollständige Dokumentation zur VBA- CDbl -Funktion finden Sie hier .

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

So konvertieren Sie einen String in VBA in einen Int-Wert
So konvertieren Sie eine Zeichenfolge in VBA in eine lange Zeichenfolge