Логотип
Надстройка VBA-Excel
Один из самых лучших продуктов по цена/качество. Подробнейшие инструкции, поймут все кто даже только открыл для себя Excel.
Сергей

Как извлечь слова на латинице из ячейки

Функция ИЗВЛЕЧЬЛАТИНИЦУ поможет вернуть английские слова из заданной ячейки или лекста

 

Добавить в Excel!

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

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

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

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

Функция =ИЗВЛЕЧЬЛАТИНИЦУ(ТЕКСТ) имеет один аргумент:

  • ТЕКСТ - строка или ссылка на ячейку, из которой необходимо извлечь слова на латинице.

Пример

С помощью данной функции можно, к примеру, вытащить из объявлений о продаже автомобилей их марки и модели. 

Пример 1 функции ИЗВЛЕЧЬЛАТИНИЦУ

Код на VBA

Function ИЗВЛЕЧЬЛАТИНИЦУ(ТЕКСТ As String) As String

    Dim i As Long
    Dim SimbolLatin
    Dim splt
    Dim temptext As String
    Dim Result As String

    SimbolLatin = "*[abcdefghijklmnopqrstuvwxyz]*"
    Result = ""
    splt = Split(ТЕКСТ, " ")

    For i = 0 To UBound(splt)
        temptext = LCase(splt(i))
        If temptext Like SimbolLatin Then
            Result = Result & " " & splt(i)
        End If
    Next

    ИЗВЛЕЧЬЛАТИНИЦУ = Trim(Result)
End Function

Установка

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

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


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

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

  1. Удалить латинские буквы
  2. Как извлечь русские слова из ячейки Excel
  3. Проверка существования Email в Excel
  4. Проверка наличия русского текста в ячейке Excel

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

comments powered by Disqus