Hur delar jag text i separata kolumner med versaler i Excel?
Om du antar att du har en rad data som du vill dela cellinnehållet i separata kolumner med stora bokstäver som följande skärmdump visas, har du några bra idéer för att lösa detta problem i Excel?
Dela upp text i separata kolumner med versaler med formler
Dela upp text i separata kolumner med versaler med VBA-kod
Dela upp text i separata kolumner med versaler med Kutools för Excel
Dela upp text i separata kolumner med versaler med formler
Om det bara finns två ord i dina celler hjälper följande formler dig att slutföra det här jobbet. Gör så här:
1. Ange denna matrisformel: =LEFT(A2,SMALL(FIND(CHAR(ROW(INDIRECT("65:90"))),A2&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"),2)-1) (A2 är den cell som du vill dela med versaler) i en tom cell som ligger intill dina data och tryck sedan på Ctrl + Skift + Enter för att få det första ordet, se skärmdump:
2. Välj sedan C2 och dra påfyllningshanteraren ner till cellerna som du vill använda denna formel, alla de första orden i intervallcellerna har extraherats på en gång, se skärmdump:
3. Fortsätt med att ange en annan formel: = BYT ut (A2,1, LENN (C2), "") (A2 är cellen som du vill dela, och C2 är cellen innehåller det första ordet som du har returnerat) i cell D2 och tryck på ange nyckel för att få det andra ordet, se skärmdump:
4. Välj cell D2, dra fyllningshandtaget ner till cellerna för att få det andra ordet, och cellinnehållet i intervallet har delats upp i två kolumner med versaler, se skärmdump:
Dela upp text i separata kolumner med versaler med VBA-kod
Ovanstående formler tillämpas endast på cellvärdet som innehåller två ord. Om det finns flera ord i en cell som behöver delas kan du lägga till mellanslag före versalerna och sedan tillämpa texten på kolumner för att dela cellinnehållet i separera kolumner efter mellanslag.
Tillämpa först VBA-kod för att lägga till mellanslag före versalen för att separera orden.
1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.
2. Klicka Insert > Modulernaoch klistra in följande kod i Modulerna Fönster.
VBA-kod: Infoga mellanslag före varje stor bokstav i en cell
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. Spara och stäng den här koden, gå tillbaka till kalkylbladet, ange denna formel: = splitwords (A2) i en tom cell intill dina data, se skärmdump:
4. Dra sedan fyllningshandtaget ner till de celler som du vill tillämpa denna formel, och mellanslag har införts före varje stor bokstav för att separera cellinnehållet, se skärmdump:
5. Och sedan bör du kopiera och klistra in dessa formelceller som värden för att ta bort formlerna på en annan plats eller i det ursprungliga intervallet.
För det andra, använd funktionen Text to Column för att dela cellinnehållet i separata kolumner efter mellanslag.
6. Markera cellvärdena som du har infogat mellanslag och klicka på Data > Text till kolumner, i steg 1 i Konvertera text till kolumner guiden, Välj avgränsad alternativ, se skärmdump:
7. Klicka sedan Nästa -knappen, i steg 2 i guiden, kontrollera Utrymme alternativet under avgränsare avsnitt, se skärmdump:
8. Fortsätt klicka Nästa -knappen, i guiden Steg 3, välj Allmänt alternativet under Kolumndataformatoch välj sedan en cell där du vill placera delade värden genom att klicka 
knapp, se skärmdump:
9. Äntligen klickar du på Finish knapp har cellinnehållet delats upp i flera kolumner enligt följande skärmdump:
Dela upp text i separata kolumner med versaler med Kutools för Excel
Om du har Kutools för Excel, kombinerar dess lägga till text och Dela celler funktioner kan du hantera den här uppgiften enkelt och bekvämt, gör så här:
| Kutools för Excel : med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsning på 30 dagar. |
1. Välj de originaldata som du vill dela.
2. Klicka sedan Kutools > text > lägga till text, se skärmdump:
3. I lägga till text dialogrutan, skriv mellanslag en gång eller någon annan avgränsare du behöver i text rutan och välj sedan 1: a bokstaven är versal från Lägg bara till avsnitt, se skärmdump:
4. Klicka sedan på Ok knapp och mellanslag har lagts till före varje stor bokstav, se skärmdump:
5. Och sedan kan du tillämpa Dela celler nytta av Kutools för Excel för att dela cellvärdena efter utrymme, hålla dataområdet valt och klicka sedan på Kutools > Slå ihop och dela > Dela celler, se skärmdump:
6. I Dela celler dialogrutan väljer du Dela upp till kolumner under Typ avsnitt och kontrollera Utrymme eller andra avgränsare som du lade till i steg 3, se skärmdump:
7. Klicka sedan på Ok, och en snabbruta dyker upp för att påminna dig om att du väljer en cell för att placera delad data, se skärmdump:
8. Äntligen klickar du på OK knappen, och du får det resultat du behöver, se skärmdump:
Ladda ner och testa gratis Kutools för Excel nu!
Demo: Dela upp text i separata kolumner med versaler med Kutools för Excel
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
