Як розділити текст на окремі стовпці великою літерою в Excel?

Припустимо, у вас є ряд даних, які ви хочете розділити вміст комірки на окремі стовпці великою літерою, як показано на наступному знімку екрана, чи є у вас якісь ідеї для вирішення цієї проблеми в Excel?

Розбийте текст на окремі стовпці великою літерою з формулами

Розділіть текст на окремі стовпці великою літерою з кодом VBA

Розділіть текст на окремі стовпці великими літерами за допомогою Kutools для Excel

Розбийте текст на окремі стовпці великою літерою з формулами

Якщо у клітинках лише два слова, наступні формули допоможуть вам закінчити цю роботу. Будь ласка, виконайте наступне:

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

2. Потім виберіть C2 і перетягніть маркер заповнення вниз до комірок, до яких ви хочете застосувати цю формулу, усі перші слова комірок діапазону були витягнуті відразу, див. Знімок екрана:

3. Продовжуйте вводити іншу формулу: = ЗАМІНИ (A2,1, LEN (C2), "") (A2 - комірка, яку потрібно розділити, і C2 є клітинка містить перше слово, яке ви повернули) в клітинку D2, і натисніть Що натомість? Створіть віртуальну версію себе у клавіша, щоб отримати друге слово, див. знімок екрана:

4. Виділіть комірку D2, перетягніть маркер заповнення до комірок, щоб отримати друге слово, і вміст комірки діапазону розділено на дві колонки великою літерою, див. Знімок екрана:

Розділіть текст на окремі стовпці великою літерою з кодом VBA

Наведені вище формули застосовуються лише до значення комірки, яке містить два слова. Якщо в комірці є кілька слів, які потрібно розділити, ви можете додати пробіли перед великими літерами, а потім застосувати текст до стовпців, щоб розділити вміст комірки на окремі стовпці пробілом.

Спочатку застосуйте код VBA, щоб додати пробіли перед великою літерою, щоб розділити слова.

1. Утримуйте клавішу ALT + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.

2. Клацання Insert > Модуліта вставте наступний код у Модулі Вікно

Код 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 майстра поставте галочку Простір опція під Делімітери розділ, див. знімок екрана:

8. Продовжуйте натискати МАЙБУТНІ у кроці 3 майстра виберіть Загальне опція під Формат даних стовпця, а потім виберіть клітинку, куди потрібно ввести значення розділення, клацнувши , див. знімок екрана:

9. Нарешті клацніть обробка , вміст комірки було розділено на кілька стовпців, як показано на наступному знімку екрана:

Розділіть текст на окремі стовпці великими літерами за допомогою Kutools для Excel

Якщо у вас є Kutools для Excel, поєднуючи його додати текст та Розділені клітини функції, ви можете легко і комфортно впоратися з цим завданням, будь-ласка, виконайте такі дії:

1. Виберіть вихідні дані, які потрібно розділити.

2. Потім натисніть Кутулс > текст > додати текст, див. скріншот:

3, в додати текст діалогове вікно, будь ласка, введіть пробіл один раз або будь-який інший роздільник, який вам потрібен, у текст , а потім виберіть Перша буква - велика від Додавати лише до розділ, див. знімок екрана:

4. Потім натисніть Ok , а пробіли були додані перед кожною великою літерою, див. знімок екрана:

5. І тоді ви можете застосувати Розділені клітини корисність Kutools для Excel щоб розділити значення комірок на простір, зберігаючи вибраний діапазон даних, а потім клацніть Кутулс > Злиття та розділення > Розділені клітини, див. скріншот:

6, в Розділені клітини діалогове вікно, виберіть Розділити на стовпці під тип розділ, і перевірте Простір або інші роздільники, які ви додали на кроці 3, див. знімок екрана:

7. Потім натисніть Ok, і з'явиться підказка, щоб нагадати вам вибрати комірку для розміщення розділених даних, див. знімок екрана:

8. Нарешті клацніть OK , і ви отримаєте потрібний результат, див. знімок екрана:

Завантажте та безкоштовну пробну версію Kutools для Excel зараз!

Демонстрація: розділіть текст на окремі колонки великими літерами за допомогою Kutools для Excel