Det finns flera sätt att bryta ner ett ord med sina bokstäver i Excel, beroende på hur du vill att utgången formateras:
Metod 1:Använda funktionen "Mid" (för horisontellt arrangemang)
Denna metod extraherar varje bokstav individuellt i separata celler. Anta att ditt ord är i cell A1.
* kolumn B: I cell B1 anger du formeln `=Mid ($ 1,1,1)`. Detta extraherar den första bokstaven.
* kolumn C: I cell C1 anger du formeln `=Mid ($ 1,2,1)`. Detta extraherar den andra bokstaven.
* Fortsätt: Dra fyllningshandtaget (det lilla fyrkanten längst ner till höger om cellen) till höger för att utöka formeln för så många bokstäver som finns i ditt ord i A1. Formeln justerar automatiskt det andra argumentet (startpositionen) för varje efterföljande cell.
Detta tillvägagångssätt är enkelt men kräver ett antal kolumner som är lika med längden på det längsta ordet du kommer att bearbeta.
Metod 2:Använda `Mid 'och` TextJoin' (för en enda cell)
Denna metod sammanställer alla bokstäver i en enda cell, separerad av en avgränsare (t.ex. ett utrymme eller komma).
* I cell B1 anger du denna formel (justera avgränsaren efter behov):
`=TextJoin (" ", True, Mid ($ a $ 1, sekvens (len ($ a $ 1)), 1))`
* `Len ($ a $ 1)`:får ordets längd i a1.
* `Sekvens (len ($ a $ 1))`:Skapar en sekvens av siffror från 1 till ordets längd.
* `Mid ($ A $ 1, sekvens (len ($ a $ 1)), 1)`:extraherar varje bokstav med hjälp av sekvensen som startposition.
* `TextJoin (" ", sant, ...)`:går med de extraherade bokstäverna med ett utrymme som avgränsare. `Sant 'ignorerar tomma värden.
Denna metod är mer kompakt och effektiv om du vill ha alla bokstäver i en cell. Kräver Excel 365 eller senare versioner för "sekvens" och "TextJoin" -funktioner.
Metod 3:Använda VBA (för mer komplexa scenarier)
För mer komplexa scenarier, som att hantera ord i flera celler eller behöver mer kontroll över utgångsformatet, är ett VBA -makro den mest mångsidiga lösningen. Här är ett exempel:
`` VBA
Sub Breakdownwords ()
Dim cell som intervall
Dim Word som sträng
Dim i som heltal
Dim Letter som String
För varje cell inom räckvidd ("A1:A10") 'Justera intervallet efter behov
Word =cell.value
Om len (ord)> 0 då
För i =1 till len (ord)
bokstav =mitt (ord, i, 1)
'Outputalternativ:
'1. Till nästa kolumn:cell.offset (0, i) .Value =bokstav
'2. Till en enda cell (separerad med komma):cell.offset (0, 1) .Value =cell.offset (0, 1) .Value &Letter &","
Nästa jag
Slut om
Nästa cell
Slutsub
`` `
Denna makro itererar genom celler i kolumn A, extraherar varje bokstav och matar ut den antingen till på varandra följande kolumner eller sammanlänkar den i en enda cell i nästa kolumn. Kom ihåg att anpassa utgångsalternativen inom VBA -koden för att matcha ditt exakta krav.
Välj den metod som bäst passar dina behov och Excel -version. Metod 2 (med hjälp av "TextJoin" och "sekvens") är i allmänhet den mest effektiva och kortfattade för enstaka bearbetning i moderna Excel-versioner. VBA erbjuder maximal flexibilitet men kräver lite mer programmeringskunskap.
