如何在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.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選項卡支持類似的處理，使您可以在一個Word窗口或Excel窗口中瀏覽多個Word文檔或Excel工作簿，並通過單擊它們的選項卡輕鬆地在它們之間進行切換。 |
 |
