【Excel・VBA】半角→全角、全角を半角にする
ExcelとVBAの半角文字を全角文字にしたり、全角文字を半角文字にしたりする方法を毎回忘れて調べ直してしまうので、というメモ。
関数
全角文字→半角文字
=ASC("abc")
結果:abc
半角文字→全角文字
=JIS("abc")
結果:abc
VBA
全角文字→半角文字
MsgBox StrConv("abc", vbNarrow)
結果:abcと表示される
半角文字→全角文字
MsgBox StrConv("abc", vbWide)
結果:abcと表示される
VBAでワークシート関数を使うと全角文字→半角文字は出来て、半角文字→全角文字だとエラーになってしまいました。
MsgBox WorksheetFunction.Asc("ABC")
で実行すると、

このように、半角のABCと表示されるのですが、
MsgBox WorksheetFunction.Jis("ABC")
で実行するとエラーになってしましました。

このようなエラーメッセージが出てしまいます。
VBAはまだまだ難しいです。


ディスカッション
コメント一覧
まだ、コメントがありません