VBA #007 - 選択範囲の半角スペース一括置換

選択範囲の半角スペースを一括置換するメモ。

common.bas

Worksheets("Sheet1").Range("A1:B5").Select

'選択範囲の半角スペース一括置換
Selection.Replace What:=" ", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

• 参考文献
  Office VBA Reference