如何在 Word 中將底線格式替換為斜體？

Author: Amanda Li Last Modified: 2025-05-12

在某些情況下，您可能需要在 Word 中將所有底線字元替換為斜體，或者反之亦然。如何快速將所有底線字元替換為斜體呢？您可以根據以下兩種巧妙的方法來完成操作。

使用「查找和替換」將所有底線字元替換為斜體

使用 VBA 將所有底線字元替換為斜體

使用「查找和替換」將所有底線字元替換為斜體

步驟 1：點擊「主頁」> 「替換」或使用快捷鍵Ctrl + H啟動「查找和替換」對話框；

步驟 2：點擊「更多」按鈕以顯示搜尋選項。

步驟 3：將游標放在 「查找內容」框中，從「格式」下拉列表中選擇「字體」，然後選擇底線樣式和底線顏色。

步驟 4：將游標放在「替換為」框中，從「格式」下拉列表中選擇「字體」，然後在字形列表中選擇「傾斜」。

Find and Replace dialog box Find Font dialog box

步驟 5：點擊「確定」>「全部替換」。

注意：

1. 點擊「無格式」以確保在「查找內容」框和「替換為」框中未指定任何格式信息。

2. 此處理僅使帶有底線的文字變為斜體，但無法清除底線。

Office Tab：為 Word、Excel、PowerPoint... 帶來分頁介面

Navigate through documents using Office Tab

立即提升您的工作流程。了解更多關於 Office Tab 的資訊 免費下載

使用 VBA 將所有底線字元替換為斜體

另外，您也可以使用 VBA 將底線替換為斜體。但如果您不熟悉宏，我不推薦此方法。請按照以下步驟進行操作：

步驟 1：按下 Alt+F11 打開 Word 中的 VBA 視窗；

步驟 2：在「插入」標籤中點擊「模組」，並將 VBA 程式碼插入到模組視窗中；

用於將所有底線字元替換為斜體的 VBA 程式碼：

Sub ReplaceUnderlineWithItalic()
'Update 20131107
Selection.Find.ClearFormatting
Selection.Find.Font.Underline = wdUnderlineSingle
Selection.Find.Replacement.ClearFormatting
Selection.Find.Replacement.Font.Italic = True
With Selection.Find
.Text = ""
.Replacement.Text = ""
.Replacement.Font.Underline = wdUnderlineNone
.Forward = True
.Wrap = wdFindAsk
.Format = True
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

步驟 3：點擊執行按鈕以應用 VBA 程式碼（或按下 F5).