エクセルで後ろのスペースを消したい

質問

ＡＡ■ＡＡ■ＡＡ■■
ＡＡＡ■ＡＡ■■■■
Ａ■Ａ■ＡＡＡ■■■

※■＝スペース

右に桁埋めされたスペースだけを取り除きたいのですができますでしょうか？

回答No.5

imogasi · ベストアンサー

TRIM関数は
（１）先頭のスペースを取る
（２）後尾のスペースを取る
（３）中間のスペースを１半角スペースにする
（１）、（３）でも良いですか。
右のスペースだけを取り去るなら
ユーザー関数を定義し
Function rtrimx(a)
rtrimx = RTrim(a)
End Function
A列にデータがあるとして、B１セルに
=rtrimx(A1)
といれ、B1をB2以下に複写する。
ユーザー関数の定義は
ツール－マクロ－ＶＢＥ－挿入ー標準モジュールで出てきた画面に上記コードを貼りつける。
先頭のスペースだけを取るならLtrimに変える。
（３）の機能はVBのTRIM関数にはないので、必要なら、特別に作る必要あり。

お礼

今回はＴＲＩＭで十分でしたがこの方法なら更に応用が利きますね。私にとってははじめてのマクロでした。ありがとうございました。

回答No.4

koma1000nin

質問の主旨は、Ｘ列にある文字列の空白をトリムして、元のセルに置きたいってことでしょう？
だったらＸ列の隣に新しい列を一時挿入して、そこにNo.#1さんのトリム式をズラッと書き込みます。
全部の処理が終わったら結果のセルを全部コピーして、Ｘ列に「形式を指定して貼り付け」ます。このときのパラメタは"値(V)"を選択してください。
作業が終わったら一時挿入した列を削除して元に戻します。

お礼

ありがとうございました。

回答No.3

nota55

ＡＡＡ■ＡＡ■■■■
のうちの桁埋めされたスペースって事は，■■■■だけ
削除する（Ａ■Ａはそのまま）って事ですか？
しかもスペースの数は不定なんｄすよね。

えーっと…CSVで吐き出してGrepをつかてゴニョゴニョ
するのが手っ取り早いんじゃないでしょうか。

お礼

ありがとうございました。

回答No.2

s_yoshi_6

スペースを消去したい範囲を選択して、
編集メニュー→置換で、「検索する文字列」にスペース、「検索後の文字列」に何も入力せず、必要に応じて「半角と全角を区別する」のチェックを外し、「全てを置換」で一度に削除されます。

お礼

ありがとうございます。やってみたんですが中間のスペースまでも全部消えてしまいました。やり方がまずかったでしょうか・・

回答No.1

abekkan

A1にそのデータが入っているとすると、
=TRIM(A1)
で前後のスペースは消えます。

お礼

できました！ありがとうございました。