Excel2000 VBA 全角、半角が混在する郵便番号を半角にする。

Excel2000 VBA 全角、半角が混在する郵便番号を半角にする。

コピペで入力した郵便番号を半角に統一したい時に簡単便利なVBA（ASC関数使用）

（ハイフンは記入されているものとする）

Sub 郵便番号半角()
’事前に範囲指定する
　Selection.Value = Application.Asc(Selection)
End Sub

参考にしたサイト

ttp://moug.net/tech/exvba/0140046.html

 

タグ：Excel2000 VBA 郵便番号　半角