Совет. Другие языки - Google-Translated. Вы можете посетить English версия этой ссылки.
Войти
x
or
x
x
Регистрация
x

or

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

Если есть специальные символы, такие как % ^ & * () в текстовых строках, и теперь вы хотите удалить тезисные символы из строк ячеек. Чтобы удалить их один за другим, потребуется много времени, здесь я расскажу о некоторых быстрых трюках для решения этой задачи в Excel.

Удалите некоторые специальные символы из текстовой строки с помощью функции User Defined

Удалите некоторые специальные символы из текстовой строки с помощью Kutools for Excel


Удалите числовые, альфа-символы или другие специальные символы из текстовой строки:

Kutools for Excel's Удалить символы функция может помочь вам быстро удалить все числовой, альфа, нечисловая, Non-альфа, непечатаемый, другие конкретные символы из текстовых строк по мере необходимости. Нажмите, чтобы загрузить и бесплатно пробную версию Kutools для Excel сейчас!

doc удалить специальные символы 7

Kutools for Excel: с более чем 200 удобными надстройками Excel, бесплатно попробовать без ограничений в 60-дни. Скачать и бесплатно пробную версию!


arrow синий правый пузырь Удалите некоторые специальные символы из текстовой строки с помощью функции User Defined


Следующий код VBA может помочь вам удалить нужные вам персонажи, пожалуйста, сделайте следующее:

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

2. Щелчок Вставить > модуль, и вставьте следующий код в модуль Окно.

Код VBA: удалить некоторые специальные символы из текстовой строки

Function RemoveSpecial(Str As String) As String
'updatebyExtendoffice 20160303
    Dim xChars As String
    Dim I As Long
    xChars = "#$%()^*&"
    For I = 1 To Len(xChars)
        Str = Replace$(Str, Mid$(xChars, I, 1), "")
    Next
    RemoveSpecial = Str
End Function

3, Затем сохраните и закройте этот код, вернитесь на рабочий лист и введите следующую формулу: = Removespecial (A2) в пустую ячейку, где вы хотите поместить результат, см. снимок экрана:

doc удалить специальные символы 1

4, Затем перетащите дескриптор заполнения в ячейки, которые вы хотите применить к этой формуле, и все специальные символы, которые вам не нужны, были удалены из текстовой строки, см. Снимок экрана:

doc удалить специальные символы 2

Внимание: В приведенном выше коде вы можете изменить специальные символы #% ($) ^ * & для любых других, которые вы хотите удалить.


Если вы не владеете кодом VBA, Kutools for ExcelАвтора Удалить символы утилита поможет вам быстро и легко завершить эту задачу.

Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно попробовать без ограничений в 60-дни.

После установки Kutools for Excel, пожалуйста, сделайте следующее:

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

2. щелчок Kutools > Текст > Удалить символы, см. снимок экрана:

doc удалить специальные символы 3

3. В Удалить символы диалоговое окно, проверьте На заказ вариант под Удалить символы раздел и введите специальные символы, которые вы хотите удалить, см. снимок экрана:

doc удалить специальные символы 4

4, Затем нажмите Ok or применять , символы, указанные в На заказ текстовые поля были удалены из текстовых строк сразу, см. скриншоты:

doc удалить специальные символы 5  2 doc удалить специальные символы 6

Нажмите, чтобы загрузить и бесплатно пробную версию Kutools для Excel сейчас!


Kutools for Excel: с более чем 200 удобными надстройками Excel, бесплатно попробовать без ограничений в 60-дни. Скачать и бесплатно пробную версию!


  • Супер Формула Бар (легко редактировать несколько строк текста и формул); Макет чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
  • Объединить ячейки / строки / столбцы и хранение данных; Содержание сплит-клеток; Объедините дублирующиеся строки и сумму / среднее... предотвратить повторяющиеся клетки; Сравнить диапазоны...
  • Выберите Дубликат или Уникальный Ряды; Выберите пустые строки (все ячейки пусты); Супер найти и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
  • Точная копия Несколько ячеек без изменения формулы ссылки; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
  • Любимые и быстро вставляемые формулы, Диапазоны, графики и рисунки; Шифрование ячеек с паролем; Создать список рассылки и отправлять электронные письма ...
  • Извлечение текстаДобавить текст, Удалить по позиции, Удалить пространство; Создание и печать промежуточных итогов подкачки; Преобразование содержимого ячеек и комментариев...
  • Суперфильтр (сохранить и применить схемы фильтров к другим листам); Расширенный поиск по месяцам / неделям / дням, частоте и более; Специальный фильтр жирным шрифтом, курсивом ...
  • Объединить рабочие тетради и рабочие листы; Объединение таблиц на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Работает с Office 2007-2019 и 365 и поддерживает все языки. Это легко развернуть в вашей компании. Полнофункциональная 60-дневная бесплатная пробная версия.
вкладка kte 201905
  • Включить редактирование и чтение с вкладками в Word, Excel, PowerPoint, Издатель, Доступ, Visio и Проект.
  • Открывайте и создавайте несколько документов в новых вкладках одного и того же окна, а не в новых окнах.
  • Увеличивает вашу производительность на 50% и уменьшает сотни щелчков мышью для вас каждый день!
нижняя часть офиса
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Nick DeCastro · 18 days ago
    Rather than searching for specific special characters, how about if you want to search for and replace ALL special characters. In other words, how would you write the search for NOT one of the following characters: "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"
    • To post as a guest, your comment is unpublished.
      skyyang · 5 days ago
      Hi, Nick,
      Do you want to remove all ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789 characters from the cells?
      Looking forward to your reply, thank you!
      • To post as a guest, your comment is unpublished.
        Nick DeCastro · 4 days ago
        No. I want to keep only "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"
        • To post as a guest, your comment is unpublished.
          skyyang · 4 days ago
          Nick,
          Maybe the below VBA code can solve your problem, please try:

          Sub RemoveNotAlphasNotNum()
          Dim Rng As Range
          Dim WorkRng As Range
          On Error Resume Next
          xTitleId = "KutoolsforExcel"
          Set WorkRng = Application.Selection
          Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
          For Each Rng In WorkRng
          xOut = ""
          For i = 1 To Len(Rng.Value)
          xTemp = Mid(Rng.Value, i, 1)
          If xTemp Like "[a-z.]" Or xTemp Like "[A-Z.]" Or xTemp Like "[0-9.]" Then
          xStr = xTemp
          Else
          xStr = ""
          End If
          xOut = xOut & xStr
          Next i
          Rng.Value = xOut
          Next
          End Sub


          Hope it can help you!
  • To post as a guest, your comment is unpublished.
    Kim · 6 months ago
    Hmm I wonder, does it only work in the worksheet you've originally pasted the code in?
    As for that one it only seems to work, not for any new workbook you open
    • To post as a guest, your comment is unpublished.
      skyyang · 6 months ago
      Hello, Kim,
      The VBA code can only applied in one workbook, if you want to apply it in a new workbook, you should copy and paste the code into your new workbook again.
      Thank you!
  • To post as a guest, your comment is unpublished.
    Kim · 6 months ago
    Hi guys,

    I've applied the =removespecial(A2) code and it works perfectly in one worksheet but then in the other it gives me an invalid #NAME? error.
    I checked the "format cells" and it's both on general and I've copied the same text + formula to both worksheets but it won't work.
    Any clue what this might cause this?

    Thanks and thank you so much for this code.
    Saves me hours and hours of work!

    Regards, Kim
  • To post as a guest, your comment is unpublished.
    Deepak · 1 years ago
    Function GetWordWOSpecChar(Rng As Range)
    'paste in VBA module, Use as a Formula
    'Created by Deepak Sharma
    Arr = Array("48", "49", "50", "51", "52", "53", "54", "55", _
    "56", "57", "65", "66", "67", "68", "69", "70", "71", "72", "73", "74", "75", _
    "76", "77", "78", "79", "80", "81", "82", "83", "84", "85", "86", "87", "88", _
    "89", "90", "97", "98", "99", "100", "101", "102", "103", "104", "105", "106", _
    "107", "108", "109", "110", "111", "112", "113", "114", "115", "116", "117", _
    "118", "119", "120", "121", "122")

    For i = 1 To Len(Rng.Value)
    txt = Mid(Rng.Value, i, 1)
    For g = 1 To UBound(Arr)
    If txt = Chr(Arr(g)) Then GetWord = Right(Rng.Value, Len(Rng.Value) - (i - 1)): Exit Function
    Next g
    Next i

    End Function