たぶん私はそれらの強迫神経症のタイプの1人ですが、段落の終わりに末尾のスペースがないことを確認するために常にドキュメントを調べます。これにより、ドキュメントがすっきりと小さくなります。他の人から受け取ったASCIIファイルまたはドキュメントをフォーマットする場合は、Word用にファイルをフォーマットするときに、末尾のスペースを検索して削除する必要があります。次のマクロStripSpacesは、ドキュメント全体で段落記号と手動改行の前のすべてのスペースを削除します。

Sub StripSpaces()

Selection.HomeKey Unit:=wdStory     Selection.Find.ClearFormatting     Selection.Find.Replacement.ClearFormatting     With Selection.Find         .Text = " ^p"

.Replacement.Text = "^p"

.Forward = True         .Wrap = wdFindContinue         .Format = False         .MatchWholeWord = False         .MatchWildcards = False     End With     Selection.Find.Execute     While Selection.Find.Found         Selection.HomeKey Unit:=wdStory         Selection.Find.Execute Replace:=wdReplaceAll         Selection.Find.Execute     Wend

Selection.Find.Text = " ^l"

Selection.Find.Replacement.Text = "^l"

Selection.Find.Execute     While Selection.Find.Found         Selection.HomeKey Unit:=wdStory         Selection.Find.Execute Replace:=wdReplaceAll         Selection.Find.Execute     Wend End Sub

注：

このページ（または_WordTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

linkここをクリックして、新しいブラウザタブでその特別なページを開きます。

_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。

（Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。）このヒント（13376）は、Microsoft Word 2007、2010、2013、2016、2019、およびOffice 365のWordに適用されます。このヒントのバージョンは、ここにWordの古いメニューインターフェイス：

linkStrip TrailingSpaces。