Vba で文字列を double に変換する方法 (例付き)

VBA でCDbl関数を使用すると、テキスト文字列を double データ型に変換できます。

この関数を実際に使用する一般的な方法は次のとおりです。

 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

この特定のマクロは、文字列が数値の場合にのみ、範囲A2:A11内の各文字列を double データ型に変換します。

それ以外の場合、文字列は null 値に変換されます。

次の例は、この構文を実際に使用する方法を示しています。

例: VBA で文字列を Double に変換する

Excel に次の値の列があり、現在テキスト文字列としてフォーマットされているとします。

各文字列が数値の場合にのみdouble データ型に変換し、列 B に表示したいとします。

これを行うには、次のマクロを作成できます。

 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

このマクロを実行すると、次の出力が表示されます。

列 A の数値であるテキスト文字列のみが列 B の double データ型に変換されることに注意してください。

それ以外の場合、テキスト文字列は単純に null 値に変換されます。

注: VBA CDbl関数の完全なドキュメントはここにあります。

追加リソース

次のチュートリアルでは、VBA で他の一般的なタスクを実行する方法について説明します。

VBAで文字列をintに変換する方法
VBAで文字列を長い文字列に変換する方法