[726] 前後のスペースと文字と文字の間の空白を1マス残して削除したい
hohe [2023/01/19 14:09:04]
いつも大変助かっております。
同じような質問があればすみません。
エクセルのTRIMのような関数で、余分な前後のスペースと、文字と文字の間のスペースは、1つを残して削除するマクロは設定可能でしょうか。
宜しくお願い致します。
Re: [726] 前後のスペースと文字と文字の間の空白を1マス残して削除したい
あすかぜ [2023/01/19 22:16:14]
正規表現で置換するのが簡単そうです。
正規表現では先頭のスペースは「^\s+」、末尾のスペースは「\s+$」、連続するスペースは「\s+」と表現できるので、
次のような 2 行のマクロで、先頭と末尾のスペースを削除してそれ以外のスペースを 1 つのみ残すことができると思います。
ReplaceAll("^\\s+|\\s+$", "", false, false, true);
ReplaceAll("\\s+", " ", false, false, true);
試してみてください。
Re: [726] 前後のスペースと文字と文字の間の空白を1マス残して削除したい
hohe [2023/02/07 08:39:32]
お世話になります。
ご返信遅くなりました。
回答いただいた記述でうまくいきました。
ありがとうございました。