如何在Word中将所有尾注转换为纯文本

如何在Word中将所有尾注转换为纯文本

将尾注转换为文本将方便您编辑或删除尾注。 例如，如果您想一次选择带有其他常规文本的尾注，Word将不允许您这样做。 您如何轻松完成它？ 本教程将向您展示几种将尾注转换为纯文本的方法。

手动将尾注转换为文本

使用VBA将尾注转换为文本

使用 Kutools for 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中的每个aendnotevbCr和aendnote.Index _的ActiveDocument.Range.InsertAfter＆vbTab和aendnote.Rangeaendnote.Reference.InsertBefore“ a”和aendnote.Index＆“ a”下一个aendnote对于ActiveDocument.Endnotes中的每个aendnote附注.参考.删除下一个aendnoteSelection.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替换：= wdReplaceAllEND SUB

请注意： 您可以更改宏的开头和结尾以适应您的喜好。

使用 Kutools for Word 将尾注转换为文本

对于那些刚接触计算机的新手来说，VBA太复杂而无法处理。 但是随着 Kutools for Word 安装后，您可以快速将所有尾注转换为文本 Convert Endnotes to Text 一键实用程序。

Kutools for Word, 与超过  方便的功能，使您的工作更加轻松。 

安装后 Kutools for Word，请执行以下操作：

1.请点击以下方式应用此实用程序 库工具 > 转化率 > Convert Endnotes to Text。 看截图：

2。 点击后 Convert Endnotes to Text，您将看到如下屏幕截图所示的结果：

 

演示：将所有尾注转换为单词文本

相关文章： 在Word中将多个表转换为文本 在Word中将方程式转换为图像