Как удалить дубликаты в строке - PullRequest
0 голосов
/ 13 ноября 2018

У меня есть файл, содержащий 38 000 записей, каждая строка содержит 2 или более ';' в конце. есть ли формула для удаления повторения конца ';' в Excel или любом другом инструменте, например

1 Ответ

0 голосов
/ 13 ноября 2018

Чтобы удалить повторяющиеся символы (в данном случае точки с запятой)

  1. Hit CTRL + H
  2. Найти что: ;; (две точки с запятой)
  3. Заменить на: ; (одна точка с запятой)
  4. Нажмите Заменить все .Когда он закончится, повторяйте шаг 4 до тех пор, пока больше не будет найдено совпадений.

Теперь в документе будет не более одной точки с запятой подряд.


Удаление повторяющихся символов с помощью функции VBA:

Следующая функция делает то же самое с помощью VBA и для любого выбранного символа:

Function removeDoubleChars(txt As String, doubleChar As String) As String
'removes all multiple-consecutive [doubleChar] within [txt]
    Do
        txt = Replace(txt, doubleChar & doubleChar, doubleChar)
    Loop While InStr(txt, doubleChar & doubleChar) > 0
    removeDoubleChars = txt
End Function

Выбудет использовать это как Range("A1") = removeDoubleChars ( Range("A1"), ";") для удаления последовательных точек с запятой из ячейки A1.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...