Логотип
Надстройка VBA-Excel
Очень полезный и качественный ресурс. Грамотно упакован и удобен в использовании. Экономит серьезные временные траты при обработке больших объемов информации.
Андрей Фирсов

Извлечь текст из строки Excel

C помощью пользовательской формулы ТЕКСТИЗСТРОКИ вы сможете извлечь текст из строки игнорируя при этом числовые значения.

 

Добавить в Excel!

Установите программу

*Этого функционала нет в стандартном Excel

 Скачали:  32 471 чел.

Описание функции

Функция =ТЕКСТИЗСТРОКИ(СТРОКА) имеет один аргумент:

  • СТРОКА - текст или ссылка на ячейку из которой необходимо извлечь текст игнорируя при этом числовые значения.

Приведу пример использования данной функции

Пример

Извлекаем текст строки пропуская числа.

Пример функции ТЕКСТИЗСТРОКИ

Код на VBA

Function ТЕКСТИЗСТРОКИ(СТРОКА As String) As String
 
    Dim sSymbol As String * 1, sWord As String
    Dim i As Long
 
    sWord = ""
    sSymbol = ""
 
    For i = 1 To Len(СТРОКА)
        sSymbol = Mid(СТРОКА, i, 1)
        If Not LCase(sSymbol) Like "[0-9]" Then
            If (sSymbol = "," Or sSymbol = "." Or sSymbol = " " Or sSymbol = "'") And i > 1 Then
                If Mid(СТРОКА, i - 1, 1) Like "[0-9]" And Mid(СТРОКА, i + 1, 1) Like "[0-9]" Then sSymbol = ""
            End If
            sWord = sWord & sSymbol
        End If
    Next
    ТЕКСТИЗСТРОКИ = sWord
End Function

Установка

Обращаем Ваше внимание, что функционал, описанный в данной статье, ОТСУТСТВУЕТ в Excel.

Чтобы его добавить, необходимо установить надстройку VBA-Excel. Данная программа содержит более сотни функций, которые сделают работу с Excel в разы эффективней. С ней рутинные задачи будут занимать считанные секунды. Программой уже воспользовались 32 471 чел., попробуйте и Вы!


Установите программу

Ссылки по теме

  1. Поиск с конца строки в Excel
  2. Вернуть текст до найденного слова или символа
  3. Как найти число в произвольной части текста
  4. Как удалить лишние пробелы в диапазоне

Комментарии:

comments powered by Disqus