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

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

※■＝スペース

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

No.1 回答者： abekkan 回答日時： 2004/07/03 11:28

A1にそのデータが入っているとすると、

=TRIM(A1)
で前後のスペースは消えます。

この回答へのお礼

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

お礼日時：2004/07/03 11:39

No.2 回答者： s_yoshi_6 回答日時： 2004/07/03 11:28

スペースを消去したい範囲を選択して、

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

この回答へのお礼

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

お礼日時：2004/07/03 11:44

No.3 回答者： nota55 回答日時： 2004/07/03 11:46

ＡＡＡ■ＡＡ■■■■

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

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

この回答へのお礼

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

お礼日時：2004/07/04 09:07

No.4 回答者： koma1000nin 回答日時： 2004/07/03 12:20

質問の主旨は、Ｘ列にある文字列の空白をトリムして、元のセルに置きたいってことでしょう？

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

この回答へのお礼

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

お礼日時：2004/07/04 09:07

No.5 ベストアンサー 回答者： imogasi 回答日時： 2004/07/03 14:21

TRIM関数は

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

この回答へのお礼

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

お礼日時：2004/07/04 09:06