也许我是这些强迫症类型之一，但是我总是仔细检查我的文档以确保行尾没有尾随空格。这使文档更整齐，更小。如果格式化从其他人收到的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_网站上的任何其他页面）中描述的宏，我准备了一个包含有用信息的特殊页面。

点击此处在新的浏览器标签中打开该特殊页面。

_WordTips_是您进行经济有效的Microsoft Word培训的来源。

（Microsoft Word是世界上最流行的文字处理软件。）此技巧（969）适用于Microsoft Word 97、2000、2002和2003。您可以找到Word（Word 2007）的功能区界面的该技巧版本。和更高版本）在这里：

Strip Trailing Spaces。