如何刪除 Microsoft Word 中的所有腳註

如果您想為文檔添加評論、解釋和參考，腳註和尾註會非常有用。它們使將附加註釋與正文分開變得容易。

但是，有時您會默認獲得它們，而您可能並不需要。您可能會收到一份充滿腳註的文檔，您認為這些腳註沒有用。如果要刪除它們，Word 提供了多種方法。

如果它們太多而無法手動刪除，有 3 種方法可以一次刪除所有這些。我們將在本文中介紹您需要了解的所有內容。

使用查找和替換選項刪除腳註和尾註

這是最廣泛使用的方法，也是最簡單的方法之一。只需點擊幾下，您就可以刪除所有腳註。這是如何做的。

1. 在您正在編輯的文檔中，打開“查找和替換”對話框：在 Mac 上，轉到“編輯”>“查找”，然後選擇“高級查找和替換”。如果您使用的是 Word 2013 或 2016，則可以通過按Ctrl + H來執行此操作。
2. 打開對話框後，單擊“替換”。
3. 在“查找內容”框中，為腳註輸入 ^f，為尾註輸入 ^e。您也可以通過選擇“更多”>“特殊”>“腳註標記”或“尾註標記”來執行此操作。
4. 將替換為框留空，然後轉到全部替換。

這是三種刪除腳註和尾註的方法中最簡單的一種。如果您更精通技術並想嘗試編碼，還有兩個額外的選擇。

錄製宏

如果您必須處理包含大量腳註的多個文檔，錄製宏是將它們全部刪除的最佳方式。執行此操作後，您可以將宏分配給鍵盤上的鍵或 Word 中的選項。這將允許您在每次需要從文檔中刪除所有腳註時使用它。

要錄製執行此操作的宏，請使用以下代碼：

Sub DeleteFootnotes()
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^f"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

您可以用同樣的方法刪除尾註，只需將 ^f 替換為 ^e 即可。將宏分配給按鈕或鍵，您將能夠立即刪除文檔中的所有腳註。

使用 VBA 代碼

這是一種您不需要任何編碼知識的方法，因為它非常簡單。它不允許像宏一樣多次使用，但它是從文檔中刪除腳註和尾註的閃電般快速的方法。這是你必須做的。

1. 按Alt + F11運行 VBA 編輯器。
2. 轉到插入 > 模塊。
3. 雙擊打開該模塊，然後粘貼以下代碼以刪除所有腳註：

Sub DeleteAllfootnotes()
Dim objFootnote As Footnote
For Each objFootnote In ActiveDocument.Footnotes
objFootnote.Delete
Next
End Sub

要刪除尾註，請粘貼此代碼：

Sub DeleteAllEndnotes()
Dim objEndnote As Endnote
For Each objEndnote In ActiveDocument.Endnotes
objEndnote.Delete
Next
End Sub

1. 準備就緒後，選擇運行。

此方法允許您刪除您可能無法手動刪除的所有腳註和尾註，因為並非所有標記都可以在沒有代碼的情況下刪除。這包括需要宏的自定義標記。

手動刪除腳註

最後，您可能只想刪除其中的一些。如果是這種情況，唯一的方法就是手動操作。每個腳註在正文中都有對應的編號。

1. 要刪除腳註，您所要做的就是從正文中刪除數字，它會自動消失。
2. 您也可以右鍵單擊腳註本身，選擇轉到腳註，然後從那裡刪除數字。

最後的話

根據情況，您可以使用上述任何一種方法來去掉腳註和尾註。如果您知道您將不得不反复處理它們，那麼錄製一個宏並將其分配給鍵盤上的一個鍵是您的最佳選擇。

對於單次使用，您可以使用 VBA 編輯器，或者如果您不喜歡編碼，則使用第一種方法。無論您決定採用哪種方式，您都可以立即處理腳註。