Как извлечь первое, последнее или n-е слово из текстовой строки в Excel?

Если вам нужно извлечь первое слово из списка текстовых строк, приведённые ниже формулы помогут справиться с этой задачей.

Чтобы извлечь первое слово, введите приведённую ниже формулу в пустую ячейку, а затем протяните маркер автозаполнения до нужного диапазона.

=IF(ISERR(FIND(« »,A2)),«»,LEFT(A2,FIND(« »,A2)-1))

Чтобы извлечь последнее слово из каждой ячейки, примените эту формулу:

=IF(ISERR(FIND(« »,A2)),«»,RIGHT(A2,LEN(A2)-FIND(«*»,SUBSTITUTE(A2,« »,«*»,LEN(A2)-LEN(SUBSTITUTE(A2,« »,«»))))))

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

Примечания: В приведённых выше формулах A2 обозначает ячейку, из которой будет извлекаться первое или последнее слово.

Сложно запомнить длинные и сложные формулы? Удивительный инструмент поможет вам извлечь n-е слово всего за несколько кликов!

Приведённые выше длинные формулы позволяют извлекать лишь первое и последнее слово, но не подходят для получения любого указанного n-го слова — например, второго, шестого и так далее. Даже если вам удастся создать формулы для решения этой задачи, они окажутся слишком громоздкими, чтобы их легко запомнить и использовать на практике. В таком случае настоятельно рекомендуем воспользоваться функцией «Извлечь N-е слово из ячейки» из набора Kutools для Excel — она максимально упростит извлечение нужного слова!

Если вам нужно извлечь второе, третье или любое другое n-е слово из текстовой строки, создайте пользовательскую функцию для выполнения этой задачи.

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

2. Нажмите Вставка > Модуль и вставьте следующий код в окно Модуля.

Function FindWord(Source As String, Position As Integer)
'Update 20131202
Dim arr() As String
arr = VBA.Split(Source, " ")
xCount = UBound(arr)
If xCount < 1 Or (Position - 1) > xCount Or Position < 0 Then
    FindWord = ""
Else
    FindWord = arr(Position - 1)
End If
End Function

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

Примечание: В приведённой выше формуле A2 — это ячейка, из которой вы хотите извлечь слово, а число 3 указывает на третье слово в строке, которое необходимо извлечь. Вы можете изменить эти параметры по своему усмотрению.

Этот метод использует функцию Kutools для Excel «Разделить ячейки», чтобы извлекать отдельные слова из текстовых ячеек и размещать их по горизонтали или вертикали — в зависимости от ваших задач.

1. Выделите ячейки с текстовыми строками, из которых нужно извлечь слова, и нажмите Kutools > Объединить и разделить > Разделить ячейки.

2. В открывшемся диалоговом окне «Разделить ячейки» укажите тип разбиения в разделе Тип, установите флажок напротив параметра Пробел в разделе Разделитель и нажмите кнопку ОК. См. снимок экрана:

3. Теперь укажите диапазон для вывода извлечённых слов и нажмите кнопку ОК.

Если в диалоговом окне Разделить ячейки вы установите флажок напротив параметра Разделить на столбцы, каждое слово будет извлечено из текстовой строки и расположено по вертикали.

Если в диалоговом окне Разделить ячейки вы установите флажок напротив параметра «Разделить на строки», каждое слово будет извлечено из текстовой строки и перечислено по горизонтали.

Если у вас установлен Kutools для Excel, вы можете воспользоваться его функцией Помощник формул > Извлечь N-ое слово из ячейки, чтобы быстро и легко извлечь n-е слово из указанной ячейки.

1. Выделите ячейку, в которую будет помещено извлечённое слово, и нажмите Kutools > Помощник формул > Помощник формул, чтобы активировать эту функцию.

2. В диалоговом окне Помощник формул выполните следующие действия:
(1) Выберите Текст в раскрывающемся списке Тип формулы;
(2) Щёлкните, чтобы выделить Извлечь N-ое слово из ячейки в списке Выберите формулу;
(3) В поле Ячейка укажите ячейку, из которой нужно извлечь слово;
(4) В поле Порядковый номер укажите номер слова.

3. Нажмите кнопку ОК. При необходимости перетащите маркер автозаполнения из ячейки с формулой, чтобы скопировать её в другие ячейки.