Przejdź do głównej zawartości

Jak podzielić tekst na oddzielne kolumny wielką literą w programie Excel?

doc podzielone na duże 1

Przypuśćmy, że masz zakres danych, które chcesz podzielić zawartość komórki na oddzielne kolumny za pomocą dużej litery, jak pokazano na poniższym zrzucie ekranu, czy masz jakieś dobre pomysły na rozwiązanie tego problemu w programie Excel?

Podziel tekst na oddzielne kolumny za pomocą wielkich liter i formuł

Podziel tekst na oddzielne kolumny za pomocą dużej litery z kodem VBA

Podziel tekst na oddzielne kolumny za pomocą dużej litery za pomocą Kutools for Excel


Jeśli w twoich komórkach są tylko dwa słowa, poniższe formuły pomogą ci ukończyć tę pracę. Wykonaj następujące czynności:

1. Wprowadź tę formułę tablicową: =LEFT(A2,SMALL(FIND(CHAR(ROW(INDIRECT("65:90"))),A2&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"),2)-1) (A2 to komórka, którą chcesz podzielić wielką literą) na pustą komórkę sąsiadującą z danymi, a następnie naciśnij Ctrl + Shift + Enter klucze razem, aby uzyskać pierwsze słowo, patrz zrzut ekranu:

doc podzielone na duże 2

2. Następnie wybierz C2 i przeciągnij uchwyt wypełniania w dół do komórek, do których chcesz zastosować tę formułę, wszystkie pierwsze słowa komórek zakresu zostały wyodrębnione naraz, patrz zrzut ekranu:

doc podzielone na duże 3

3. Przejdź do innego wzoru: = ZAMIEŃ (A2,1; DŁ (C2); „”) (A2 to komórka, którą chcesz podzielić, a C2 to komórka zawiera pierwsze zwrócone słowo) do komórki D2 i naciśnij Wchodzę klucz, aby uzyskać drugie słowo, patrz zrzut ekranu:

doc podzielone na duże 4

4. Wybierz komórkę D2, przeciągnij uchwyt wypełniania w dół do komórek, aby uzyskać drugie słowo, a zawartość komórki zakresu została podzielona na dwie kolumny za pomocą dużej litery, patrz zrzut ekranu:

doc podzielone na duże 5


Powyższe formuły są stosowane tylko do wartości komórki, która zawiera dwa słowa, jeśli w komórce jest wiele słów, które należy podzielić, możesz dodać spacje przed dużymi literami, a następnie zastosować tekst do kolumn, aby podzielić zawartość komórki na oddziel kolumny spacją.

Najpierw zastosuj kod VBA, aby dodać spacje przed wielką literą, aby oddzielić słowa.

1. Przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod w Moduł Okno.

Kod VBA: wstaw spacje przed każdą wielką literą w komórce

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. Zapisz i zamknij ten kod, wróć do arkusza roboczego, wprowadź tę formułę: = słowa dzielone (A2) do pustej komórki sąsiadującej z danymi, patrz zrzut ekranu:

doc podzielone na duże 6

4. Następnie przeciągnij uchwyt wypełniania w dół do komórek, do których chcesz zastosować tę formułę, a spacje zostały wstawione przed każdą wielką literą, aby oddzielić zawartość komórki, patrz zrzut ekranu:

doc podzielone na duże 7

5. Następnie należy skopiować i wkleić te komórki formuły jako wartości, aby usunąć formuły w innym miejscu lub w oryginalnym zakresie.

doc podzielone na duże 8

Po drugie, zastosuj funkcję Tekst do kolumny, aby podzielić zawartość komórki na oddzielne kolumny spacją.

6. Wybierz wartości komórek, do których wstawiłeś spacje, i kliknij Dane > Tekst do kolumn, w kroku 1 w Konwertuj Kreator tekstu na kolumnę, Wybierz Rozgraniczone opcja, patrz zrzut ekranu:

doc podzielone na duże 9

7. Następnie kliknij Następna w kroku 2 kreatora, zaznacz Typ przestrzeni opcja pod Ograniczniki sekcja, patrz zrzut ekranu:

doc podzielone na duże 10

8. Kliknij dalej Następna w kroku 3 kreatora wybierz Ogólne opcja pod Format danych kolumny, a następnie wybierz komórkę, w której chcesz umieścić wartości podziału, klikając doc podzielone na duże 12 przycisk, zobacz zrzut ekranu:

doc podzielone na duże 11

9. Nareszcie kliknij koniec przycisk, zawartość komórki została podzielona na wiele kolumn, jak pokazano na poniższym zrzucie ekranu:

doc podzielone na duże 13


Jeśli Kutools dla programu Excel, łącząc jego Dodaj tekst i Podział komórki funkcje, możesz poradzić sobie z tym zadaniem łatwo i wygodnie, wykonaj następujące czynności:

Kutools dla programu Excel : z ponad 300 poręcznymi dodatkami Excela, które można wypróbować bez ograniczeń w ciągu 30 dni.

1. Wybierz oryginalne dane, które chcesz podzielić.

2. Następnie kliknij KutoolsTekst > Dodaj tekstzobacz zrzut ekranu:

3, w Dodaj tekst W oknie dialogowym wpisz raz spację lub inny potrzebny separator w Tekst a następnie wybierz Pierwsza litera jest wielka z Dodawaj tylko do sekcja, patrz zrzut ekranu:

doc podzielone na duże 15

4. Następnie kliknij Ok przycisk i spacje zostały dodane przed każdą wielką literą, patrz zrzut ekranu:

doc podzielone na duże 16

5. A następnie możesz zastosować Podział komórki użyteczność Kutools dla programu Excel aby podzielić wartości komórek według spacji, zachowując zaznaczony zakres danych, a następnie kliknij Kutools > Połącz i podziel > Podział komórkizobacz zrzut ekranu:

6, w Podział komórki okno dialogowe, wybierz Podziel na kolumny pod Rodzaj Nieruchomości sekcję i sprawdź Typ przestrzeni lub inne ograniczniki dodane w kroku 3, zobacz zrzut ekranu:

doc podzielony na wielkość 18 18

7. Następnie kliknij Oki pojawia się okienko zachęty przypominające o wybraniu komórki do umieszczenia podzielonych danych, patrz zrzut ekranu:

doc podzielone na duże 19

8. Nareszcie kliknij OK przycisk, a otrzymasz wynik, którego potrzebujesz, patrz zrzut ekranu:

doc podzielone na duże 20

Pobierz i bezpłatną wersję próbną Kutools dla programu Excel teraz!


Kutools dla programu Excel: z ponad 300 poręcznymi dodatkami do programu Excel, które można wypróbować bez ograniczeń w ciągu 30 dni. Pobierz i bezpłatną wersję próbną teraz!

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas.  Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...

Opis


Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

  • Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
  • Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
  • Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
Comments (8)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hola! Llevo todo el dia tratando de divir palabras juntas en celdas en excel, he dado con esta pagina, pero el código VBA no me funciona, tengo entendido que =Splitwords ya no esta disponible.
Es posible que puedas ayudarme?
This comment was minimized by the moderator on the site
Formula/function works as it should now, a later amendment (#25891) fixed it - thank you so much
This comment was minimized by the moderator on the site
DanMorgan = Dan
MollieClark = Mollie
Jade, Jam, Ryan, Dummy (not his real name),Jess,Cass, Jenni and Jack all come through as Jade,Jam, etc

using Excel 2013 (company supplied)
This comment was minimized by the moderator on the site
I need some help splitting a cell. I can do it by lower case next to upper case. But if the splitting word is one capitol letter, followed by another capitol letter it won't work. Also, if there are Roman numerals involved there are problems. If there is a word, such as "McDonald" or "MacDonald" there are problems. Can you help?
This comment was minimized by the moderator on the site
This doesn't work for two of the same capital letters
This comment was minimized by the moderator on the site
Hello,
If the two words are same words, please change the first array formula to the follows:
=LEFT(A2,SMALL(FIND(CHAR(ROW(INDIRECT("65:90"))),RIGHT(A2, LEN(A2)-1)&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"),1))

Please remember to press Ctrl + Shift + Enter keys together.

Hope it can help you!
This comment was minimized by the moderator on the site
Thanks for the content it really worked
This comment was minimized by the moderator on the site
Your formula fail if name is like this: JhonJhon MarkMark
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations