Как в Excel разбить текст на отдельные столбцы заглавной буквой?
Предположим, у вас есть диапазон данных, содержимое ячейки которых вы хотите разделить на отдельные столбцы заглавной буквой, как показано на следующем снимке экрана. Есть ли у вас какие-нибудь хорошие идеи для решения этой проблемы в Excel?
Разделить текст на отдельные столбцы заглавными буквами с формулами
Разделить текст на отдельные столбцы заглавными буквами с кодом VBA
Разделить текст на отдельные столбцы заглавной буквой с помощью Kutools for Excel
Разделить текст на отдельные столбцы заглавными буквами с формулами
Если в ваших ячейках всего два слова, следующие формулы помогут вам завершить эту работу. Пожалуйста, сделайте следующее:
1. Введите эту формулу массива: =LEFT(A2,SMALL(FIND(CHAR(ROW(INDIRECT("65:90"))),A2&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"),2)-1) (A2 - это ячейка, которую вы хотите разделить заглавной буквой) на пустую ячейку, смежную с вашими данными, а затем нажмите Shift + Ctrl + Enter ключи вместе, чтобы получить первое слово, см. снимок экрана:
2. Затем выберите C2 и перетащите дескриптор заполнения вниз к ячейкам, к которым вы хотите применить эту формулу, все первые слова ячеек диапазона были извлечены сразу, см. Снимок экрана:
3. Продолжайте вводить другую формулу: = ЗАМЕНИТЬ (A2,1; LEN (C2); "") (A2 это ячейка, которую вы хотите разделить, и C2 содержит ли ячейка первое слово, которое вы вернули) в ячейку D2 и нажмите Enter ключ, чтобы получить второе слово, см. снимок экрана:
4. Выберите ячейку D2, перетащите маркер заполнения вниз к ячейкам, чтобы получить второе слово, и содержимое ячейки диапазона было разделено на два столбца заглавной буквой, см. Снимок экрана:
Разделить текст на отдельные столбцы заглавными буквами с кодом VBA
Приведенные выше формулы применяются только к значению ячейки, которое содержит два слова, если в ячейке есть несколько слов, которые необходимо разделить, вы можете добавить пробелы перед заглавными буквами, а затем применить текст к столбцам, чтобы разделить содержимое ячейки на разделите столбцы пробелом.
Сначала примените код VBA, чтобы добавить пробелы перед заглавной буквой для разделения слов.
1. Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
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. Сохраните и закройте этот код, вернитесь на рабочий лист, введите эту формулу: = разделение слов (A2) в пустую ячейку рядом с вашими данными, см. снимок экрана:
4. Затем перетащите дескриптор заполнения вниз к ячейкам, к которым вы хотите применить эту формулу, и пробелы были вставлены перед каждой заглавной буквой, чтобы разделить содержимое ячейки, см. Снимок экрана:
5. Затем вы должны скопировать и вставить эти ячейки формулы как значения, чтобы удалить формулы в другом месте или в исходном диапазоне.
Во-вторых, примените функцию «Текст в столбец», чтобы разделить содержимое ячейки на отдельные столбцы по пространству.
6. Выберите значения ячеек, в которые вы вставили пробелы, и нажмите Данные > Текст в столбцы, на Шаге 1 Мастер преобразования текста в столбцы, наведите на разграниченный вариант, см. снимок экрана:
7. Затем нажмите Далее кнопку, на Шаге 2 мастера установите флажок Space вариант под Разделители раздел, см. снимок экрана:
8. Продолжайте нажимать Далее кнопку, на шаге 3 мастера выберите Общие вариант под Формат данных столбца, а затем выберите ячейку, в которую вы хотите поместить значения разделения, нажав 
кнопку, см. снимок экрана:
9, Наконец, нажмите Завершить , содержимое ячейки было разделено на несколько столбцов, как показано на следующем снимке экрана:
Разделить текст на отдельные столбцы заглавной буквой с помощью Kutools for Excel
Если у вас есть Kutools for Excel, совмещая Добавить текст и Разделить клетки функции, вы можете легко и удобно справиться с этой задачей, сделайте следующее:
| Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно и без ограничений в течение 30 дней. |
1. Выберите исходные данные, которые вы хотите разделить.
2. Затем нажмите Кутулс > Текст > Добавить текст, см. снимок экрана:
3. В Добавить текст диалоговом окне, введите пробел один раз или любой другой разделитель, который вам нужен, в Текст поле, а затем выберите 1-я буква заглавная из Только добавить к раздел, см. снимок экрана:
4. Затем нажмите Ok перед каждой заглавной буквой были добавлены пробелы, см. снимок экрана:
5. А затем вы можете применить Разделить клетки полезности Kutools for Excel чтобы разделить значения ячеек по пробелу, не снимая выделения с диапазона данных, а затем щелкните Кутулс > Слияние и разделение > Разделить клетки, см. снимок экрана:
6. В Разделить клетки диалоговое окно, выберите Разделить на столбцы под Тип раздел и проверьте Space или другие разделители, добавленные на шаге 3, см. снимок экрана:
7. Затем нажмите Ok, и появится окно подсказки, чтобы напомнить вам выбрать ячейку для размещения разделенных данных, см. снимок экрана:
8, Наконец, нажмите OK кнопку, и вы получите нужный результат, см. снимок экрана:
Загрузите бесплатную пробную версию Kutools for Excel прямо сейчас!
Демо: разделите текст на отдельные столбцы заглавной буквой с помощью Kutools for Excel
Лучшие инструменты для работы в офисе
Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%
- Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма ...
- Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
- Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы... Предотвращение дублирования ячеек; Сравнить диапазоны...
- Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
- Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
- Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии...
- Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом ...
- Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
- Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
