Come convertire una stringa in double in vba (con esempi)

È possibile utilizzare la funzione CDbl in VBA per convertire una stringa di testo in un tipo di dati double.

Ecco un modo comune per utilizzare questa funzione nella pratica:

 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

Questa particolare macro convertirà ogni stringa nell’intervallo A2:A11 in un tipo di dati double solo se la stringa è un numero.

In caso contrario, la stringa verrà convertita in un valore nullo.

L’esempio seguente mostra come utilizzare questa sintassi nella pratica.

Esempio: converti una stringa in Double in VBA

Supponiamo di avere la seguente colonna di valori in Excel, attualmente formattata come stringhe di testo:

Supponiamo di voler convertire ogni stringa in un tipo di dati double solo se la stringa è un numero e visualizzarli nella colonna B.

Per fare ciò possiamo creare la seguente macro:

 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

Quando eseguiamo questa macro, riceviamo il seguente output:

Tieni presente che solo le stringhe di testo nella colonna A che sono numeri vengono convertite in tipi di dati doppi nella colonna B.

Altrimenti, le stringhe di testo vengono semplicemente convertite in un valore nullo.

Nota : qui è possibile trovare la documentazione completa per la funzione VBA CDbl .

Risorse addizionali

I seguenti tutorial spiegano come eseguire altre attività comuni in VBA:

Come convertire una stringa in int in VBA
Come convertire una stringa in lunga in VBA