Excel2000データで、既に空白が空いているところを半角２文字分に統一するには

質問

Excelで何千件もある、マスターの修正をしています。

すでに空白の空いているデータの空白の長さがまちまちなので
半角２文字分に統一したいのですが、よい方法が見つからず
手作業で何時間もかけて修正している状態です。

マスターですので何桁目に空白を空けるのかというのは
データによってバラバラです。

何かよい解決策はありませんでしょうか？

回答No.2

HitomiKurose · ベストアンサー

そのシートに空きがあればそこでもいいですし、別シートでもいいですが、
データの入っている範囲と同じサイズの空き領域の、A1に対応する部分に
=TRIM(A1) と入力し範囲全体にコピー&ペースト。
範囲全体を選択しコピー、値を貼り付け。
置換で「半角スペース」を「半角スペース２つ」に、
置換で「全角スペース」を「半角スペース２つ」に（順番が逆は不可）。
範囲をコピーし、元のデータ範囲に貼り付け。
作業領域を削除。

で、いかがでしょう。

回答No.4

bin-chan

Trim関数を使用すると、文字列の途中の連続した半角スペースは
半角スペース１個になります。

１．セルＡ１に[１△△△△２(△は半角1個）]を入力。
２．セルＢ１に式[=trim(A1)]とすると結果は[１△２]
３．コピー＆形式を選択して張り付け（値）でＢ１を値に変更。
４．Ｃｔｒｌ＋Ｈ（置換）で「半角１個」を「半角２個」にする。

全角スペースの半角にしたいなら、１の前に
Ｃｔｒｌ＋Ｈ（置換）で「全角１個」を「半角１個」にしておく。

ではいかがでしょうか？

お礼

大変ご丁寧な回答、ありがとうございました。

分かりやすく教えていただいたTRIM関数と置き換えを使って、
無事解決することができました。

回答No.3

HitomiKurose

No.2のHitomiKuroseです。すみません、補足があります。

作業が別シートの場合は３行目の式は
=TRIM(Sheet1!A1)

（シート名が違えばSheet1の部分をシート名にして下さい。）

回答No.1

k_eba

この回答はお気に召しませんか？

参考URL：

http://www2.odn.ne.jp/excel/waza/function.html#SEC30