06.29 vb saved
k1LoW
Tags add more
VBA  
Note
全角文字を半角に変換します
  1. Sub 全角を半角に変換()
  2.     Dim ss As Range
  3.    
  4.     For Each ss In Selection
  5.         ss.Value = StrConv(ss.Value, vbNarrow)
  6.     Next
  7. End Sub
Parsed in 0.004 seconds, using GeSHi 1.0.7.14

Modify this Paste