VBA StrConv関数の使い方【半角,全角の変換】

文字列の半角と全角を変換するにはStrConv関数を使用します。データの整形(クレンジング)で大活躍する関数となっています。

StrConv(文字列, 変換したい文字種)

文字種には半角と全角で2パターン指定することができます。

vbWide：全角へ変換
vbNarrow：半角へ変換

半角を全角へ変換

上記の表を題材に考えてみます。データ1の表にある半角の文字列を全角に変換して、結果1の欄に出力するコードは次のようになります。

Sub 半角を全角へ変換()
    Dim i As Long
    For i = 2 To 5
        Cells(i, 2).Value = StrConv(Cells(i, 1), vbWide)
    Next
End Sub

全角を半角へ変換

逆に全角を半角へ変換するには次のように書けます。

Sub 全角を半角へ変換()
    Dim i As Long
    For i = 2 To 5
        Cells(i, 2).Value = StrConv(Cells(i, 1), vbNarrow)
    Next
End Sub