Как заменить символы с ударениями на обычные символы в Excel?

Замена символов с ударениями на обычные символы с помощью VBA

Замена символов с ударениями на обычные символы с помощью Kutools для Excel

Для опытных пользователей Microsoft Excel использование макроса VBA — это простой способ справиться с этой сложной задачей.

1. Удерживайте клавиши Alt + F11 в Excel, чтобы открыть окно Microsoft Visual Basic для приложений.

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 для Excel позволяет легко заменить все виды символов с ударениями на обычные символы сразу.

1. Выберите диапазон, в котором вы хотите заменить все символы с ударениями.

2. Нажмите Kutools > Текст > Замена символов с ударениями…, см. скриншот:

3. В Замена символов с ударениями диалоговом окне нажмите кнопку Выбрать все , чтобы выбрать все правила замены, и нажмите кнопку ОК, чтобы заменить все символы с ударениями. См. скриншот:

Примечания:
(1) Если в списке нет определенных символов с ударениями, которые вам нужны, вы можете нажать кнопку Добавить правило , чтобы добавить свои собственные правила в список в диалоговом окне «Замена символов с ударениями» выше.
(2) Вы можете настроить новые правила замены в диалоговом окне «Замена символов с ударениями».

Теперь все символы с ударениями в строках выбранного диапазона будут немедленно преобразованы в обычные символы. См. скриншот:

Функция «Замена символов с ударениями» в Kutools для Excel может легко заменить все виды символов с ударениями на обычные символы во всей книге. Попробуйте бесплатно!