Ako rozoberiete slovo svojimi písmenami v programe Excel?

Existuje niekoľko spôsobov, ako rozbiť slovo pomocou jeho písmen v Exceli, v závislosti od toho, ako chcete naformátovať výstup:

Metóda 1:Použitie funkcie `Mid` (pre horizontálne usporiadanie)

Táto metóda extrahuje každé písmeno individuálne do samostatných buniek. Predpokladajme, že vaše slovo je v bunke A1.

* stĺpec B: V bunke B1 zadajte vzorec `=mid ($ 1,1,1)`. Tým sa vyťažuje prvé písmeno.

* stĺpec C: V bunke C1 zadajte vzorec `=mid ($ 1,2,2)`. Tým sa vyťažuje druhé písmeno.

* pokračujte: Potiahnite rukoväť výplne (malý štvorec v pravom dolnom rohu bunky) doprava, aby ste predĺžili vzorec pre toľko písmen, koľko sú vo vašom slove v A1. Vzorec automaticky upraví druhý argument (východisková poloha) pre každú nasledujúcu bunku.

Tento prístup je jednoduchý, ale vyžaduje niekoľko stĺpcov rovnajúcich sa dĺžke najdlhšieho slova, ktoré spracujete.

Metóda 2:Použitie `Mid` a` TextJoin` (pre jednu bunku)

Táto metóda zreťazuje všetky písmená do jednej bunky, oddelené delimiterom (napr. Priestor alebo čiarka).

* V bunke B1 zadajte tento vzorec (podľa potreby upravte oddeľovač):

`=TextJoin (" ", true, mid ($ a 1, sekvencia (len ($ a $ 1)), 1))`

* `Len ($ a $ 1)`:Získa dĺžku slova v A1.

* `Sekvencia (Len ($ a $ 1))`:Vytvára sekvenciu čísel od 1 do dĺžky slova.

* `Mid ($ A 1, sekvencia (Len ($ A 1)), 1)`:Extrahuje každé písmeno pomocou sekvencie ako východiskovej polohy.

* `TextJoin (" ", True, ...)`:Pripojí sa s extrahovanými písmenami s priestorom ako oddeľovač. „True` ignoruje prázdne hodnoty.

Táto metóda je kompaktnejšia a efektívnejšia, ak chcete všetky písmená v jednej bunke. Vyžaduje Excel 365 alebo neskoršie verzie pre funkcie „Sekvencia“ a `TextJoin`.

Metóda 3:Použitie VBA (pre zložitejšie scenáre)

Pre zložitejšie scenáre, ako je napríklad zaobchádzanie s slovami vo viacerých bunkách alebo potrebujú väčšiu kontrolu nad výstupným formátom, je makro VBA najuniverzálnejším riešením. Tu je príklad:

`` `VBA

Sub -Blackdownwords ()

Dim bunka ako rozsah

Dim slovo ako reťazec

Dim I ako celé číslo

Dim písmeno ako reťazec

Pre každú bunku v rozsahu („A1:A10“) „Upravte rozsah podľa potreby

word =bunka.Value

Ak len (slovo)> 0 potom

Pre i =1 až Len (slovo)

Letter =Mid (slovo, i, 1)

„Výstupné možnosti:

'1. Do nasledujúceho stĺpca:Cell.offset (0, i) .Value =písmeno

'2. Do jednej bunky (oddelenej čiarkami):Cell.Offset (0, 1) .Value =Cell.offset (0, 1) .Valu a písmeno &",", "

Ďalej i

Skončiť

Ďalšia bunka

Koncový

`` `

Toto makro iteraje cez bunky v stĺpci A, extrahuje každé písmeno a výstupne ho buď k po sebe idúcich stĺpcoch, alebo ho zreťazuje do jednej bunky v nasledujúcom stĺpci. Nezabudnite prispôsobiť možnosti výstupu v kóde VBA tak, aby zodpovedali vašej presnej požiadavke.

Vyberte metódu, ktorá najlepšie vyhovuje vašim potrebám a verzii programu Excel. Metóda 2 (s použitím textovoin` a „sekvencie“) je vo všeobecnosti najúčinnejšia a najúčinnejšia pre spracovanie s jedným slovom v moderných verziách programu Excel. VBA ponúka maximálnu flexibilitu, ale vyžaduje trochu viac programovacích znalostí.

• Predchádzajúca strana: Čo je to šablóna v slove? 
• Ďalšia strana: Ako používam kurzívu na počítači?