У Бренды много информации, которая была импортирована или вставлена ​​в рабочий лист. Иногда текст на листе будет содержать «чужой»

и странные персонажи. Она задается вопросом, есть ли способ легко преобразовать данные, чтобы они не содержали символов, отличных от ASCII, и, возможно, некоторые иностранные символы были преобразованы в обычные значения ASCII (например, преобразование букв с диакритическими знаками в буквы без диакритических знаков).

Есть несколько вещей, которые вы можете попробовать. Во-первых, вы можете использовать функцию CLEAN workheet, чтобы избавиться от непечатаемых символов. Просто используйте функцию следующим образом:

=CLEAN(A1)

В результате получается «очищенный» текст без непечатаемых материалов. Если вы хотите заменить иностранные символы обычными символами ASCII, это нужно будет сделать с помощью макроса. Вот пример относительно простого подхода:

Sub StripAccent()

Dim sAcc As String     Dim sReg As String     Dim sA As String     Dim sR As String     Dim i As Integer

sAcc = "ŠŽšžŸÀÁÂÃÄ�...ÇÈÉÊËÌÍÎÏÐ�'�'�"�"ÕÖÙÚÛÜÝàáâãäåçè��©êëìí��®ïðñòóôõöùúûüýÿ"

sReg = "SZszYAAAAAACEEEEIIIIDNOOOOOUUUUYaaaaaaceeeeiiiidnooooouuuuyy"



For i = 1 To Len(sAcc)

sA = Mid(sAcc, i, 1)

sR = Mid(sReg, i, 1)

Selection.Replace What:=sA, Replacement:=sR, _           LookAt:=xlPart, MatchCase:=True     Next End Sub

Макрос перебирает символы в переменной sAcc и по одному с помощью функции «Найти» и «заменить» заменяет их соответствующим символом в переменной sReg. Вы можете настроить содержимое sAcc и sReg в соответствии с вашими потребностями преобразования; главное, чтобы они были одинаковой длины.

_Примечание: _

Если вы хотите узнать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах ExcelTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

ExcelTips — ваш источник экономичного обучения Microsoft Excel.

Этот совет (11493) применим к Microsoft Excel 2007, 2010, 2013 и 2016.

Вы можете найти версию этого совета для старого интерфейса меню Excel здесь:

link: / excel-Converting_to_ASCII_Text [Преобразование в текст ASCII].