KutoolsforOffice — Одно решение — пять мощных инструментов.Меньше усилий — больше результата.

Как извлечь первую букву каждого слова из ячейки?

АвторСяоянДата изменения
извлечь первую букву каждого слова

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


Извлечение первой буквы каждого слова из ячейки с помощью формулы

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

1. Скопируйте следующую формулу в пустую ячейку, куда вы хотите поместить результат, а затем одновременно нажмите клавиши Ctrl + Shift + Enter, чтобы получить первый результат.

=CONCAT(LEFT(FILTERXML("<a><b>"&,SUBSTITUTE(A2," ","</b><b>")&,"</b></a>","//b"),1))

2. Затем протяните формулу вниз, чтобы заполнить остальные ячейки — и первая буква каждого слова в них будет извлечена автоматически. См. снимок экрана:

Извлечение первой буквы каждого слова с помощью формулы

Пояснение к этой формуле:
  • SUBSTITUTE(A2,« »,«»): Эта функция заменяет все пробелы в тексте ячейки A2 на пустую строку, объединяя слова без лишних символов. Например, если ячейка A2 содержит «Hello World», формула преобразует её в «HelloWorld».
  • ""&…&« »: Эта часть заключает результат функции SUBSTITUTE в кавычки — в начале и в конце. Продолжая пример, строка теперь становится «HelloWorld», формируя корректную XML-структуру, где каждое слово заключено в теги.
  • FILTERXML(…,«//b»): Функция FILTERXML анализирует XML-строку, созданную на предыдущих шагах. XPath-запрос //b выбирает все элементы внутри тегов , то есть каждое слово исходной строки. В нашем примере FILTERXML вернёт массив из двух элементов: «Hello» и «World».
  • LEFT(…,1): Затем к каждому элементу массива, возвращённого функцией FILTERXML, применяется функция LEFT, извлекая первую букву каждого слова. В примере это даст «H» и «W».
  • CONCAT(…): Наконец, функция CONCAT объединяет все элементы массива в одну строку. В нашем примере «Hello World» она соединит «H» и «W», получив «HW».

Извлечение первой буквы каждого слова из ячейки с помощью KUTOOLS AI Aide

Быстро извлекайте первую букву каждого слова в ячейке с помощью KUTOOLS AI Aide. Не нужны сложные формулы — AI-ассистент автоматизирует задачу за вас, делая обработку данных простой и эффективной. Оптимизируйте свою работу в Excel и упростите повседневные задачи. Попробуйте KUTOOLS AI Aide и оцените интеллектуальные возможности Excel!

Kutools для Excelпредлагает более 300 расширенных функций для упрощения сложных задач, повышая креативность и эффективность.Интегрировано с возможностями ИИ, Kutools автоматизирует задачи с высокой точностью, делая управление данными простым и удобным.Подробная информация о Kutools для Excel…         Бесплатная пробная версия…

После установки Kutools для Excel нажмите KUTOOLS AI>AI Ассистент, чтобы открыть область KUTOOLS AI Aide:

  1. Выделите список данных, введите свой запрос в чат-поле и нажмите кнопку Отправитьили клавишу Enter, чтобы отправить вопрос;
  2. После анализа нажмите кнопку Выполнить. KUTOOLS AI Aide обработает ваш запрос с помощью ИИ и вернёт результаты прямо в Excel.


Извлечение первой буквы каждого слова из ячейки с помощью пользовательской функции

Извлечение первой буквы каждого слова из ячейки — задача, которую можно значительно оптимизировать с помощью пользовательской функции (UDF) в Excel. В этом разделе рассматривается, как создать и использовать UDF для эффективного выполнения данной задачи.

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

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

Function GetFirstLetters(rng As Range) As String
'Updateby Extendoffice
    Dim arr
    Dim I As Long
    arr = VBA.Split(rng, " ")
    If IsArray(arr) Then
        For I = LBound(arr) To UBound(arr)
            GetFirstLetters = GetFirstLetters & Left(arr(I), 1)
        Next I
    Else
        GetFirstLetters = Left(arr, 1)
    End If
End Function

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

Извлечение первой буквы каждого слова с помощью пользовательской функции


Связанные статьи:

  • Извлечение первых или последних двух (или n) слов из текстовой строки
  • Если у вас есть список текстовых строк, разделённых пробелами, и вы хотите извлечь первые или последние три (или n) слова из значения ячейки — как показано на снимке экрана ниже, — в этой статье я покажу несколько формул для получения первых или последних двух (или n) слов из текстовой строки в Excel.
  • Извлечь текст только до/после пробела или запятой
  • Когда вам нужно извлечь текст до или после пробела из списка, как показано ниже, есть ли удобный способ это сделать? Расскажем несколько полезных приёмов для извлечения текста только до или после пробела в Excel.
  • Извлечь адреса электронной почты из текстовой строки
  • При импорте некоторых Адрес электронной почты с веб-сайта в лист Excel там часто содержится посторонний текст, но сейчас вы хотите извлечь только чистые Адрес электронной почты из текстовой строки (см. следующие снимки экрана). Как быстро получить только Адрес электронной почты из текста ячейки?
  • Извлечение строки между двумя разными символами
  • Если у вас в Excel есть список строк, из которых необходимо извлечь часть текста между двумя символами, как показано на снимке экрана ниже, как это можно сделать максимально быстро? Здесь я представляю несколько методов решения этой задачи.

Лучшие инструменты повышения продуктивности в Office

🤖KUTOOLS AI Помощник: Преобразуйте Анализ данных с помощью:Интеллектуального выполнения   |  Генерации кода|  Создания пользовательские формулы  |  Анализа данных и построения диаграмм|  Вызова Расширенные функции…
Популярные функции:Поиск, выделение или Отметить дубликаты   |  Удалить пустые строки   |  Объединить столбцы или ячеек без потери данных   |  Округление без использования формул…
Супер ПОИСК:VLookup по нескольким критериям  |  VLookup по нескольким значениям  |   VLookup по нескольким листам   |   Распознавание нечетких соответствий…
Расширенный раскрывающийся список:Быстрое создание выпадающего списка   |  Зависимый выпадающий список   |  Выпадающий список с множественным выбором…
Управление столбцами:Добавление заданного количества столбцов|Перемещение столбцов|Переключение видимости скрытых столбцов|Сравнение диапазонов и столбцов…
Избранные функции:Сетка фокусировки   |  Просмотр дизайна   |Улучшенная строка формулы   | Управление рабочими книгами и листами   |  Библиотека ресурсов(автотекст)|  Выбор даты   |  Объединить листы  |  Шифрование/Расшифровать ячейки   | Отправка писем по списку   |  Супер фильтр   |   Специальный фильтр(Фильтр ячеек с жирным шрифтом/курсив/зачёркивание…) …
Лучшие наборы инструментов 15:12 Текстовыеинструменты(Добавить текст,Удалить определенные символы, …)|   50+Типыдиаграмм(Диаграмма Ганта, …)|   40+ Практические формулы(Рассчитать возраст на основе даты рождения, …)|   19 Инструментывставки(Вставить QR-код,Вставка изображения по пути, …)|   12 Инструментыпреобразования(Преобразовать в слова,Конвертация валют, …)|   7 Объединить и разделитьИнструменты(Расширенное объединение строк,Разделить ячейки, …)|… и многое другое
Используйте Kutools на предпочитаемом языке — поддержка английского, испанского, немецкого, французского, китайского и ещё 40+ языков!

Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…


Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу

  • Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
  • Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!

Все надстройки Kutools — один установщик

Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.

ExcelWordOutlookTabsPowerPoint
  • Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
  • Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
  • Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
  • 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
  • Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек