如何在 Excel 中快速查找並將字元替換為上標？

在 Excel 中，我們可以通過使用「尋找和替換」功能快速將特定值替換為另一個值，但您是否曾經遇到過這樣一個問題：在特定的文本字串中找到某個特定字元並將其替換為上標格式，例如找到 YL3 然後將其替換為如下截圖所示的 YL³。當然，您可以逐一進行查找和替換，但這種方法耗時太多。有沒有什麼技巧可以在 Excel 中快速替換為上標呢？閱讀本文，您將找到答案。

使用「尋找和替換」功能將字元替換為上標


使用 VBA 將字元替換為上標

使用「尋找和替換」功能將字元替換為上標

實際上，您可以使用「尋找和替換」來查找文字，然後將其替換為上標格式。

1. 選擇要進行查找和替換操作的區域，然後按 Ctrl + H 打開「尋找和替換」對話框。

2. 在「尋找和替換」對話框中，點擊「替換」選項卡，然後在 「尋找內容」文本框中輸入要查找的文字。請參見截圖：

3. 接著轉到「 替換為」文本框，輸入要替換的文字，注意，按住 Alt 鍵，然後在數字鍵盤上按 0179 鍵以輸入上標數字 3。請參見截圖：

4. 點擊「全部替換」。隨後會彈出一個對話框，提醒您已完成多少次替換。請參見截圖：

提示：但是使用此方法，您只能通過按 0178 輸入上標數字 2，按 0179 輸入上標數字 3。

使用 Kutools AI 解鎖 Excel 的魔法

• 智能執行：執行單元格操作、分析數據並創建圖表——所有這些都由簡單的指令驅動。
• 自訂公式：生成量身定制的公式，簡化您的工作流程。
• VBA 編碼：輕鬆編寫和實現 VBA 代碼。
• 公式解釋：輕鬆理解複雜的公式。
• 文本翻譯：打破電子表格中的語言障礙。

通過人工智能工具增強您的 Excel 能力。立即下載，體驗前所未有的效率！

使用 VBA 將字元替換為上標

使用「尋找和替換」功能，只能替換為上標數字。如果您想如下面截圖所示替換字母為上標，則可以應用 VBA 程式碼來解決這個問題。

1. 按 Alt + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。

2. 點擊「插入」>「模組」，然後將以下 VBA 程式碼粘貼到腳本中。

VBA：尋找並替換為上標格式

Sub DoConvert()
'UpdatebyExtendoffice20160705
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Select a range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    For Each xCell In xRg
        If xCell.Value = "YL3" Then
            xCell.Characters(1, 1).Font.Superscript = True
        End If
    Next
End Sub

3. 按 F5 鍵運行程式碼，隨後會彈出一個對話框，提醒您選擇一個區域。請參見截圖：

4. 點擊「確定」，特定字串中的特定字元已在所選區域中被轉換為上標格式。請參見截圖：

提示：在程式碼中，“YL3” 是您要從中查找的字串，(1, 1) 表示轉換字串的第一個字符，如果要轉換前兩個字符，可以將其更改為 (1, 2)，如果要從字串的第二個字符開始轉換一個字符，可以將其更改為 (2, 1)。