如何在Word中将所有尾注转换为纯文本
将尾注转换为文本将方便您编辑或删除尾注。 例如，如果您想一次选择带有其他常规文本的尾注，Word将不允许您这样做。 您如何轻松完成它？ 本教程将向您展示几种将尾注转换为纯文本的方法。
手动将尾注转换为文本
1.将光标放在尾注所在的位置，然后按 按Ctrl + A 从文档中选择所有尾注。 看截图：
2。 按 按Ctrl + C 复制尾注。
3。 按 CTRL + END 将光标移动到整个文档的末尾和尾注之前。
4。 按 按Ctrl + V 将尾注粘贴到文档末尾。 尾注的顺序将保持不变，但粘贴的尾注已更改。 看截图：
5.手动将文本前面的所有数字1替换为原始数字列表。
使用VBA将尾注转换为文本
换句话说，您还可以使用VBA代码将尾注转换为纯文本。
1：按 Alt + F11 打开一个 Microsoft Visual Basic for Applications窗口;
2：点击 模块 止 插页 标签，将以下VBA代码复制并粘贴到 模块 窗口;
3：点击 运行 按钮或按下 F5 应用VBA。
将尾注转换为文本的VBA：
子convertendnote（）
昏暗的aendnote作为尾注
对于ActiveDocument.Endnotes中的每个aendnote
vbCr和aendnote.Index _的ActiveDocument.Range.InsertAfter
＆vbTab和aendnote.Range
aendnote.Reference.InsertBefore“ a”和aendnote.Index＆“ a”
下一个aendnote
对于ActiveDocument.Endnotes中的每个aendnote
附注.参考.删除
下一个aendnote
Selection.Find.ClearFormatting
选择.查找.替换.清除格式
带有Selection.Find.Replacement.Font
。上标=真
结束
随着Selection.Find
.Text =“（a）（[0-9] {1，}）（a）”
.Replacement.Text =“ \ 2” v .Forward = True
.Wrap = wdFindContinue
.Format =真
.MatchWildcards = 真
结束
Selection.Find.Execute替换：= wdReplaceAll
END SUB
请注意： 您可以更改宏的开头和结尾以适应您的喜好。
使用 Kutools for Word 将尾注转换为文本
对于那些刚接触计算机的新手来说，VBA太复杂而无法处理。 但是随着 Kutools for Word 安装后，您可以快速将所有尾注转换为文本 Convert Endnotes to Text 一键实用程序。
| Kutools for Word, 与超过 方便的功能，使您的工作更加轻松。 | ||
安装后 Kutools for Word，请执行以下操作：（立即免费下载 Kutools for Word！）
1.请点击以下方式应用此实用程序 库工具 > 转化率 > Convert Endnotes to Text。 看截图：
2。 点击后 Convert Endnotes to Text，您将看到如下屏幕截图所示的结果：
 |
 |
 |
演示：将所有尾注转换为单词文本
相关文章：
分页浏览和编辑多个Word文档/ Excel工作簿，如Firefox，Chrome，Internet Explore 10！ |
|
您可能熟悉在 Firefox/Chrome/IE 中查看多个网页，并通过单击相应的选项卡轻松在它们之间切换。在这里，Office Tab支持类似的处理，它允许您在一个Word窗口或Excel窗口中浏览多个Word文档或Excel工作簿，并通过单击它们的选项卡轻松地在它们之间进行切换。 |
 |
