如何在 Word 中將所有尾註轉換為純文字

Author: Sun Last Modified: 2025-05-12

Word 中的尾註通常用於引用或附加參考資料，但有時您可能需要將它們轉換為普通文字以便於編輯或格式化。手動複製和貼上每個尾註可能會很繁瑣，特別是在長篇文檔中。本指南將向您展示三種將尾註轉換為純文字的有效方法：

手動將尾註轉換為文字

使用 Kutools for Word 將尾註轉換為文字

使用 VBA 將尾註轉換為文字

手動將尾註轉換為文字

按照以下步驟手動將 Word 中的尾註轉換為純文字：

將游標放在尾註部分的任意位置，然後按 Ctrl + A 選取文檔中的所有尾註。
按 Ctrl + C 複製選取的尾註。
按 Ctrl + End 將游標移動到文檔末尾，就在尾註部分之前。
按 Ctrl + V 將複製的尾註貼到文檔末尾。尾註將保持其順序，但會被轉換為純文字。
如有必要，手動將每個貼上的尾註前的數字「1」替換為其原始編號。

使用 Kutools for Word 輕鬆將尾註轉換為文字

在 Word 中手動將尾註轉換為文字可能會很繁瑣，特別是對於不熟悉 VBA 的初學者。然而，使用 Kutools for Word，您可以透過點擊一次使用「尾注轉文本」功能快速完成此任務。

Kutools for Word，內建人工智慧 ?，提供超過 100 種實用功能，簡化您的工作流程。

立即下載

點擊 Kutools > 轉換 > 尾注轉文本。

當您點擊「尾注轉文本」後，文檔中的尾註將立即轉換為文字，如下方截圖所示：

Document with endnotes converted to text

Kutools for Word 是終極的 Word 增益工具，能夠簡化您的工作並提升文檔處理技能。立即獲取！

使用 VBA 將尾註轉換為文字

在 Word 中，您還可以使用 VBA 程式碼將尾註轉換為純文字。請按照以下步驟操作：

按 Alt + F11 打開 Microsoft Visual Basic for Applications 視窗。

點擊模組從插入標籤，然後將以下 VBA 程式碼複製並貼到模組視窗中。

Sub convertendnote()
Dim aendnote As Endnote
For Each aendnote In ActiveDocument.Endnotes
ActiveDocument.Range.InsertAfter vbCr & aendnote.Index _
& vbTab & aendnote.Range
aendnote.Reference.InsertBefore "a" & aendnote.Index & "a"
Next aendnote
For Each aendnote In ActiveDocument.Endnotes
aendnote.Reference.Delete
Next aendnote
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find.Replacement.Font
.Superscript=True
End With
With Selection.Find
.Text="(a)([0-9]{1,})(a)"
.Replacement.Text="\2"
.Forward=True
.Wrap=wdFindContinue
.Format=True
.MatchWildcards=True
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub