消除脚注和尾注中的尾随空格（Microsoft Word）

发表于： 2020年11月12日 2020年11月12日

如果杰西卡（Jessica）想要在段落末尾删除多余的空格，她知道可以搜索一个空格，后跟^ p并单独用^ p替换。但是，这不适用于脚注和尾注，可能是因为Word不允许您在此类注解中“替换”段落结尾标记。杰西卡（Jessica）想知道是否有办法解决这个限制，以便她可以轻松摆脱脚注和尾注中的尾随空格。

有趣的是，Word允许您使用“查找和替换”来消除文档正文中段落中的尾随空格，但是它并没有将相同的功能扩展到脚注和尾注中-至少在所有情况中都没有Word版本。

例如，如果您在Word 2007的脚注和尾注中都包含尾随空格，则“查找和替换”可以按照Jessica的经验进行操作-尾随空格不变。在Word 2010中，“查找和替换”仅在脚注中删除了尾随空格。它使尾注保持不变。在Word 2013中，其行为与Word 2007中的行为相同-脚注和尾注中的空格均保持不变。如果您有Word 2016，则脚注和尾注中的尾随空格均应删除。相当不一致！

如果要确保消除所有尾随空格，可以使用两种方法。首先是遵循以下步骤：

。在脚注区域中单击一次。（无所谓，在该区域中的某处。）

。按Ctrl + A。现在应该选择所有脚注。

。按Ctrl + E。现在所有脚注都居中，加上尾随空格也消失了。

。按Ctrl + L。现在，所有脚注都再次左对齐。

。对文档中的所有尾注重复步骤1至4。

当然，如果脚注和尾注不是左对齐的，则上述步骤将使对齐方式混乱。在这种情况下（如果您需要大量消除此类空间），宏可提供一种更好的方法。这是一个简短的小注释，它将消除脚注和尾注中的尾随空格。

Sub FootEndnoteTrailingSpaces()

Dim fn As Footnote     Dim en As Endnote

For Each fn In ActiveDocument.Footnotes         fn.Range.Text = RTrim(fn.Range.Text)

Next fn     For Each en In ActiveDocument.Endnotes         en.Range.Text = RTrim(en.Range.Text)

Next en End Sub

注意：

如果您想知道如何使用此页面（或_WordTips_网站上的任何其他页面）中描述的宏，我准备了一个包含有用信息的特殊页面。

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

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

（Microsoft Word是世界上最流行的文字处理软件。）本技巧（4833）适用于Microsoft Word 2007、2010、2013和2016。