VBA 全角文字を半角文字に変換する

  • 作成日 2022.09.16
  • vba
VBA 全角文字を半角文字に変換する

VBAで、全角文字を半角文字に変換するコードを記述してます。

環境

  • OS windows10 64bit

サンプルコード

全角文字を半角文字に変換するには、「StrConv」で「vbNarrow」を指定します。

StrConv("文字列", vbNarrow)

or

StrConv("文字列", 8)

【例】
StrConv("アイウエオ", 8)
' アイウエオ

適当なボタンを用意して、セル上にある文字列「アイウエオ」を全角文字に変換してセルに表示する
以下のソースコードを記述します。

ソースコード

Option Explicit

Private Sub CommandButton1_Click()

    Cells(3, 3).Value = StrConv(Cells(3, 2).Value, vbWide)

End Sub

ボタンをクリックすると、全角文字に変換されていることが確認できます。