如何在 Excel 中將重音字符替換為普通字符？

使用 VBA 將重音字符替換為普通字符

使用 Kutools for Excel 將重音字符替換為普通字符

對於熟悉 Microsoft Excel 的用戶來說，使用 VBA 宏是處理這項複雜工作的簡單方法。

1. 在 Excel 中按住 Alt + F11 鍵，打開 Microsoft Visual Basic for Applications 窗口。

2. 點擊 插入 > 模組，然後在 模組窗口中粘貼以下宏代碼。

Function StripAccent(thestring As String)
Dim A As String * 1
Dim B As String * 1
Dim i As Integer
Const AccChars= "ŠŽšžŸÀÁÂÃÄÅÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖÙÚÛÜÝàáâãäåçèéêëìíîïðñòóôõöùúûüýÿ"
Const RegChars= "SZszYAAAAAACEEEEIIIIDNOOOOOUUUUYaaaaaaceeeeiiiidnooooouuuuyy"
For i = 1 To Len(AccChars)
A = Mid(AccChars, i, 1)
B = Mid(RegChars, i, 1)
thestring = Replace(thestring, A, B)
Next
StripAccent = thestring
End Function

3. 然後進入一個空白單元格並在單元格中粘貼公式：=CheckStringCHAR(InString)，例如 =CheckStringCHAR("ù")，或 =CheckStringCHAR(A2)。

注意：
(1) 如果您的 Microsoft Visual Basic 不支持 Unicode，它可能根本無法識別重音字符。例如，當您將 "š" 粘貼到 Visual Basic 中時，可能會得到 "?"。如果是這樣，此宏不可用。
(2) 它不會直接替換所選單元格字符串中的重音字符。

使用 VBA 宏需要太多的技能和知識。而以下方法只需點擊幾下即可讓您更輕鬆地完成工作。Kutools for Excel 的替換重音字符工具讓您可以一次性輕鬆替換所有類型的重音字符為普通字符。

1. 選擇要替換所有重音字符的區域。

2. 點擊 Kutools > 文本 > 替換重音字符…，見截圖：

3. 於 替換重音字符 對話框中，點擊 全選 按鈕以選擇所有替換規則，然後點擊 確定 按鈕以替換所有重音字符。見截圖：

注意:
(1) 如果沒有您想要的某些特定重音字符，您可以點擊 添加規則 按鈕將您自己的規則添加到上述替換重音字符對話框中的列表框中。
(2) 您可以在替換重音字符對話框中自訂新的替換規則。

現在，所選範圍內字符串中的所有重音字符將立即轉換為普通字符。見截圖：

Kutools for Excel 的替換重音字符功能可以輕鬆替換整個工作簿中的所有重音字符為普通字符。免費試用！