Note: The other languages of the website are Google-translated. Back to English

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

документ разделен на 1

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

Разделить текст на отдельные столбцы заглавными буквами с формулами

Разделить текст на отдельные столбцы заглавными буквами с кодом VBA

Разделить текст на отдельные столбцы заглавной буквой с помощью Kutools for Excel


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

1. Введите эту формулу массива: =LEFT(A2,SMALL(FIND(CHAR(ROW(INDIRECT("65:90"))),A2&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"),2)-1) (A2 - это ячейка, которую вы хотите разделить заглавной буквой) на пустую ячейку, смежную с вашими данными, а затем нажмите Shift + Ctrl + Enter ключи вместе, чтобы получить первое слово, см. снимок экрана:

документ разделен на 2

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

документ разделен на 3

3. Продолжайте вводить другую формулу: = ЗАМЕНИТЬ (A2,1; LEN (C2); "") (A2 это ячейка, которую вы хотите разделить, и C2 содержит ли ячейка первое слово, которое вы вернули) в ячейку D2 и нажмите Enter ключ, чтобы получить второе слово, см. снимок экрана:

документ разделен на 4

4. Выберите ячейку D2, перетащите маркер заполнения вниз к ячейкам, чтобы получить второе слово, и содержимое ячейки диапазона было разделено на два столбца заглавной буквой, см. Снимок экрана:

документ разделен на 5


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

Сначала примените код 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) в пустую ячейку рядом с вашими данными, см. снимок экрана:

документ разделен на 6

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

документ разделен на 7

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

документ разделен на 8

Во-вторых, примените функцию «Текст в столбец», чтобы разделить содержимое ячейки на отдельные столбцы по пространству.

6. Выберите значения ячеек, в которые вы вставили пробелы, и нажмите Данные > Текст в столбцы, на Шаге 1 Мастер преобразования текста в столбцы, наведите на разграниченный вариант, см. снимок экрана:

документ разделен на 9

7. Затем нажмите Далее кнопку, на Шаге 2 мастера установите флажок Space вариант под Разделители раздел, см. снимок экрана:

документ разделен на 10

8. Продолжайте нажимать Далее кнопку, на шаге 3 мастера выберите Общие вариант под Формат данных столбца, а затем выберите ячейку, в которую вы хотите поместить значения разделения, нажав документ разделен на 12 кнопку, см. снимок экрана:

документ разделен на 11

9, Наконец, нажмите Завершить , содержимое ячейки было разделено на несколько столбцов, как показано на следующем снимке экрана:

документ разделен на 13


Если у вас есть Kutools for Excel, совмещая Добавить текст и Разделить клетки функции, вы можете легко и удобно справиться с этой задачей, сделайте следующее:

Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно и без ограничений в течение 30 дней.

1. Выберите исходные данные, которые вы хотите разделить.

2. Затем нажмите КутулсТекст > Добавить текст, см. снимок экрана:

3. В Добавить текст диалоговом окне, введите пробел один раз или любой другой разделитель, который вам нужен, в Текст поле, а затем выберите 1-я буква заглавная из Только добавить к раздел, см. снимок экрана:

документ разделен на 15

4. Затем нажмите Ok перед каждой заглавной буквой были добавлены пробелы, см. снимок экрана:

документ разделен на 16

5. А затем вы можете применить Разделить клетки полезности Kutools for Excel чтобы разделить значения ячеек по пробелу, не снимая выделения с диапазона данных, а затем щелкните Кутулс > Слияние и разделение > Разделить клетки, см. снимок экрана:

6. В Разделить клетки диалоговое окно, выберите Разделить на столбцы под Тип раздел и проверьте Space или другие разделители, добавленные на шаге 3, см. снимок экрана:

doc, разделенный на капитал 18 18

7. Затем нажмите Ok, и появится окно подсказки, чтобы напомнить вам выбрать ячейку для размещения разделенных данных, см. снимок экрана:

документ разделен на 19

8, Наконец, нажмите OK кнопку, и вы получите нужный результат, см. снимок экрана:

документ разделен на 20

Загрузите бесплатную пробную версию Kutools for Excel прямо сейчас!


Kutools for Excel: с более чем 300 удобными надстройками Excel, которые можно попробовать бесплатно без ограничений в течение 30 дней. Загрузите и бесплатную пробную версию прямо сейчас!

Лучшие инструменты для работы в офисе

Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма ...
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы... Предотвращение дублирования ячеек; Сравнить диапазоны...
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии...
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом ...
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
вкладка kte 201905

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
офисный дно
Сортировать комментарии по
Комментарии (7)
Оценок пока нет. Оцените первым!
Этот комментарий был сведен к минимуму модератором на сайте
Ваша формула не работает, если имя выглядит так: JhonJhon MarkMark
Этот комментарий был сведен к минимуму модератором на сайте
Спасибо за контент, он действительно работал
Этот комментарий был сведен к минимуму модератором на сайте
Это не работает для двух одинаковых заглавных букв
Этот комментарий был сведен к минимуму модератором на сайте
Здравствуйте,
Если два слова являются одними и теми же словами, измените первую формулу массива на следующую:
=LEFT(A2,SMALL(FIND(CHAR(ROW(INDIRECT("65:90"))),RIGHT(A2, LEN(A2)-1)&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"),1))

Не забудьте одновременно нажать клавиши Ctrl + Shift + Enter.

Надеюсь, это поможет вам!
Этот комментарий был сведен к минимуму модератором на сайте
Мне нужна помощь в разделении ячейки. Я могу сделать это строчными буквами рядом с прописными буквами. Но если разделяющим словом является одна заглавная буква, за которой следует другая заглавная буква, это не сработает. Кроме того, если есть римские цифры, возникают проблемы. Если есть слово, такое как «Макдональдс» или «Макдональдс», есть проблемы. Вы можете помочь?
Этот комментарий был сведен к минимуму модератором на сайте
Дэн Морган = Дэн
МоллиКларк = Молли
Джейд, Джем, Райан, Манекен (имя изменено), Джесс, Касс, Дженни и Джек — все они появляются как Джейд, Джем и т. д.

с использованием Excel 2013 (поставляется компанией)
Этот комментарий был сведен к минимуму модератором на сайте
Формула/функция теперь работает как надо, более поздняя поправка (#25891) исправила это - большое спасибо
Здесь еще нет комментариев
Оставляйте свои комментарии
Публикация как гость
×
Оценить этот пост:
0   Характеристики
Предлагаемые места

Подписывайтесь на Нас

Copyright © 2009 - www.extendoffice.ком. | Все права защищены. Питаться от ExtendOffice, | Карта сайта
Microsoft и логотип Office являются товарными знаками или зарегистрированными товарными знаками Microsoft Corporation в США и / или других странах.
Защищено Sectigo SSL