Удаление ведущих и конечных точек с запятой из текста в ячейке

Предположим, что в ячейке какой-то текст выглядит

;ABCD;EFGH ;;ABCD;EFGH; 

Как удалить точку с запятой только с начала и конца. Результат должен быть

 ABCD;EFGH 

Я уверен, что есть лучший способ сделать это, но он работает!

 Public Function SplitSemiColon(s As String) As String While Left(s, 1) = ";" s = Mid(s, 2) Wend While Right(s, 1) = ";" s = Left(s, Len(s) - 1) Wend SplitSemiColon = s End Function 

Поместите код в новый модуль и используйте функцию на листе, например (например):

 =SplitSemiColon(A1) 

Если нет пробелов, другой альтернативой может быть преобразование их в пробелы, обрезка и обратное преобразование:

 =Substitute(Trim(Substitute(A1,";"," "))," ",";") 

TRIM удаляет лишние пробелы, поэтому приведенное выше будет ;A;;;B; в A;B , но VBA Trim не делает:

 [A1] = Replace(Trim(Replace([A1],";"," "))," ",";") ' ";A;;;B;" into "A;;;B" 

Если есть пробелы, их можно заменить другим персонажем, но он становится слишком грязным:

 =Substitute(Substitute(Trim(Substitute(Substitute(A1," ","_"),";"," "))," ",";"),"_"," ") 
Interesting Posts

Как восстановить формулу Excel, которая вызывает TREND () в C #?

Как найти, существует ли столбец в Excel через VBA

Не хочет добавлять элементы управления на определенной странице

Excel VBA конвертировать CSV в файл Excel

Excel VBA: копирование и разделение строк на основе критериев даты / времени

Рабочий VBA, который экспортирует excel в csv UTF8

Как создать VBA, который создает сводную таблицу только в том случае, если она еще не существует

Форматировать значения PivotTable

Цветная раскраска с использованием Excel и .NET

VBA: Сравните два набора записей и записи возврата, которые доступны в наборе записей 1 и недоступны в наборе записей 2

MS Excel: как не потерять линии между ними при вставке их в таблицу?

Как отобразить ошибку синтаксиса SQL из пользовательской формы Excel VBA

Excel взаимодействует с машиной с Office 2007, но не работает на компьютере с Office 2010

Excel – разделительные символы

Разделите весь столбец в excel (бухгалтерский учет) в 2 отдельных столбцах (символ + значение)

Давайте будем гением компьютера.