Как разделить текст на отдельные столбцы по заглавной букве в Excel?

Предположим, у вас есть диапазон данных, и вы хотите разделить содержимое ячеек на отдельные столбцы по заглавной букве, как показано на следующем скриншоте. Есть ли у вас какие-либо хорошие идеи для решения этой проблемы в Excel?
Разделение текста на отдельные столбцы по заглавной букве с помощью формул
Разделение текста на отдельные столбцы по заглавной букве с помощью кода VBA
Разделение текста на отдельные столбцы по заглавной букве с помощью Kutools для Excel
Разделение текста на отдельные столбцы по заглавной букве с помощью формул
Если в ваших ячейках только два слова, следующие формулы помогут вам выполнить эту задачу. Пожалуйста, действуйте следующим образом:
1. Введите эту формулу массива: =ЛЕВСИМВ(A2;НАИМЕНЬШИЙ(ПОИСКПОЗ(СИМВ(СТРОКА(ДВССЫЛ("65:90")));A2&"ABCDEFGHIJKLMNOPQRSTUVWXYZ");2)-1) (A2 — это ячейка, которую вы хотите разделить по заглавной букве) в пустую ячейку рядом с вашими данными, а затем нажмите клавиши Ctrl + Shift + Enter вместе, чтобы получить первое слово, см. скриншот:
2. Затем выберите C2 и перетащите маркер заполнения вниз к ячейкам, куда вы хотите применить эту формулу, все первые слова из диапазона ячеек будут извлечены сразу, см. скриншот:
3. Продолжайте вводить другую формулу: =ЗАМЕНИТЬ(A2;1;ДЛСТР(C2);"") (A2 — это ячейка, которую вы хотите разделить, а C2 — это ячейка, содержащая первое слово, которое вы вернули) в ячейку D2, и нажмите клавишу Enter, чтобы получить второе слово, см. скриншот:
4. Выберите ячейку D2, перетащите маркер заполнения вниз к ячейкам, чтобы получить второе слово, и содержимое ячеек диапазона будет разделено на два столбца по заглавной букве, см. скриншот:

Раскройте магию Excel с Kutools AI
- Умное выполнение: Выполняйте операции с ячейками, анализируйте данные и создавайте диаграммы — всё это посредством простых команд.
- Пользовательские формулы: Создавайте индивидуальные формулы для оптимизации ваших рабочих процессов.
- Кодирование VBA: Пишите и внедряйте код VBA без особых усилий.
- Интерпретация формул: Легко разбирайтесь в сложных формулах.
- Перевод текста: Преодолейте языковые барьеры в ваших таблицах.
Разделение текста на отдельные столбцы по заглавной букве с помощью кода VBA
Указанные выше формулы применимы только к значениям ячеек, содержащим два слова. Если в ячейке нужно разделить несколько слов, вы можете добавить пробелы перед заглавными буквами, а затем применить функцию «Текст по столбцам», чтобы разделить содержимое ячеек на отдельные столбцы по пробелу.
Сначала примените код VBA, чтобы добавить пробелы перед заглавной буквой для разделения слов.
1. Удерживайте клавиши ALT + F11, чтобы открыть окно Microsoft Visual Basic for Applications.
2. Нажмите Вставка > Модуль и вставьте следующий код в окно модуля.
Код VBA: Вставить пробелы перед каждой заглавной буквой в ячейке
Function SplitWords(ByVal Str As String) As String
'updateby Extendoffice 20151128
Dim I As Integer
SplitWords = Left(Str, 1)
For I = 2 To Len(Trim(Str))
If (Asc(Mid(Str, I, 1)) > 64) And _
(Asc(Mid(Str, I, 1)) < 91) And _
(Mid(Str, I - 1, 1) <> " ") Then _
SplitWords = SplitWords & " "
SplitWords = SplitWords & Mid(Str, I, 1)
Next
End Function
3. Сохраните и закройте этот код, вернитесь на лист и введите эту формулу: =splitwords(A2) в пустую ячейку рядом с вашими данными, см. скриншот:
4. Затем перетащите маркер заполнения вниз к ячейкам, куда вы хотите применить эту формулу, и пробелы будут вставлены перед каждой заглавной буквой для разделения содержимого ячеек, см. скриншот:
5. И затем вам следует скопировать и вставить эти ячейки с формулами как значения, чтобы удалить формулы в другом месте или в исходном диапазоне.
Вторым шагом примените функцию «Текст по столбцам» для разделения содержимого ячеек на отдельные столбцы по пробелу.
6. Выберите значения ячеек, в которые вы вставили пробелы, и нажмите Данные > Текст по столбцам. На первом шаге мастера « Преобразование текста в столбцы» выберите опцию Разделители, см. скриншот:
7. Затем нажмите кнопку Далее. На втором шаге мастера отметьте опцию Пробел в разделе Разделители, см. скриншот:
8. Продолжайте нажимать Далее кнопку. На третьем шаге мастера выберите Общий опцию в разделе Формат данных столбца, а затем выберите ячейку, куда вы хотите поместить разделенные значения, нажав кнопку, см. скриншот:
9. В конце нажмите кнопку Готово, и содержимое ячеек будет разделено на несколько столбцов, как показано на следующем скриншоте:
Разделение текста на отдельные столбцы по заглавной букве с помощью Kutools для Excel
Если у вас есть Kutools для Excel, комбинируя его функции Добавить текст и Разделить ячейки, вы сможете легко и комфортно справиться с этой задачей, пожалуйста, действуйте следующим образом:
1. Выберите исходные данные, которые вы хотите разделить.
2. Затем нажмите Kutools > Текст > Добавить текст, см. скриншот:
3. В диалоговом окне Добавить текст, пожалуйста, введите пробел один раз или любой другой разделитель, который вам нужен, в поле Текст, а затем выберите 1-я буква прописная в разделе Только добавить, см. скриншот:
4. Затем нажмите кнопку ОК, и пробелы будут добавлены перед каждой заглавной буквой, см. скриншот:
5. А затем вы можете применить инструмент Разделить ячейки из Kutools для Excel, чтобы разделить значения ячеек по пробелу. Оставьте диапазон данных выбранным, а затем нажмите Kutools > Объединить и разделить > Разделить ячейки, см. скриншот:
6. В диалоговом окне Разделить ячейки выберите Разделить на столбцы в разделе Тип и отметьте Пробел или другие разделители, которые вы добавили на шаге 3, см. скриншот:
7. Затем нажмите ОК, и появится всплывающее окно, напоминающее выбрать ячейку для размещения разделенных данных, см. скриншот:
8. В конце нажмите кнопку ОК, и вы получите нужный результат, см. скриншот:
Скачайте и попробуйте Kutools для Excel прямо сейчас!
Лучшие инструменты для повышения продуктивности работы с Office
Ускорьте работу в Excel с Kutools для Excel и ощутите новую степень эффективности. Kutools для Excel предлагает более300 расширенных функций для повышения продуктивности и экономии времени. Нажмите здесь, чтобы выбрать нужную вам функцию...
Office Tab добавляет вкладки в Office и делает вашу работу намного проще
- Включите редактирование и чтение с вкладками в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна, а не в отдельных окнах.
- Увеличьте свою продуктивность на50% и сократите сотни лишних кликов мышью каждый день!