Přejít k hlavnímu obsahu

Jak extrahovat text pouze z alfanumerického řetězce v aplikaci Excel?

Pokud máte v každé buňce v aplikaci Excel dlouhý seznam více alfanumerických řetězců a chcete z nich extrahovat pouze textové řetězce, můžete postupovat následovně.

Extrahujte text pouze z alfanumerického řetězce pomocí definované funkce v aplikaci Excel

Extrahujte text pouze z alfanumerického řetězce pomocí programu Kutools pro Excel


šipka modrá pravá bublina Extrahujte text pouze z alfanumerického řetězce pomocí definované funkce v aplikaci Excel

Pomocí definované funkce extrahujte text pouze z alfanumerického řetězce v aplikaci Excel následujícím způsobem:

1. Vyberte buňku sloupce, který chcete vybrat, a stiskněte Alt + F11 k otevření Microsoft Visual Basic pro aplikace okno.

2. Ve vyskakovacím okně klikněte na Vložit > Modul, pak vložte následující kód VBA do modulu.

VBA: Extrahujte pouze text

Function TextOnly(pWorkRng As Range) As String
'Updateby20140515
Dim xValue As String
Dim OutValue As String
xValue = pWorkRng.Value
For xIndex = 1 To VBA.Len(xValue)
    If Not VBA.IsNumeric(VBA.Mid(xValue, xIndex, 1)) Then
        OutValue = OutValue & VBA.Mid(xValue, xIndex, 1)
    End If
Next
TextOnly = OutValue
End Function

3. Uložte kód a zavřete okno a zadejte tento vzorec = Pouze text (A1) (A1 je první buňka řádku v seznamu, ze které chcete extrahovat pouze text) do prázdné buňky, stiskněte vstoupit tlačítko, potom vyplňte úchyt do požadovaného rozsahu.


šipka modrá pravá bublina Extrahujte text pouze z alfanumerického řetězce pomocí programu Kutools pro Excel

Kutools pro Excel's Odebrat znaky Tato funkce vám také pomůže extrahovat text pouze v aplikaci Excel.

Kutools pro Excel obsahuje více než 300 užitečných nástrojů aplikace Excel. Zdarma to můžete vyzkoušet bez omezení do 30 dnů. Získat nyní

1. Vyberte rozsah, ze kterého chcete extrahovat pouze text, a klikněte na Kutools > Textové nástroje > Odebrat znaky. Viz snímek obrazovky:

2. V Odebrat znaky dialog, zkontrolujte Číselný a Netiskněte zaškrtávací políčka. Viz snímek obrazovky:

3. cvaknutí Ok, pak budou odstraněny všechny netextové znaky, viz screenshot:

Tip: Protože toto použití změní vaše původní data, měli byste nejprve zkopírovat původní data na jiné místo.

Další informace o odebrání znaků.


Relativní články:

Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...

Popis


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
rajesh kumar bind · Its working bro.. thanks
This comment was minimized by the moderator on the site
Brilliant - Many Thanks - also works for Number Extraction if the 'NOT' statement is removed - :-)
This comment was minimized by the moderator on the site
=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(a1,0,""),1,""),2,""),3,""),4,""),5,""),6,""),7,""),8,""),9,"") use this formula. if it is working please let me know on my e-mail
This comment was minimized by the moderator on the site
If we want to extract only number then what should be the formula...above extract only alpha which great work..please let me know the solution for numeric and special character extraction..
This comment was minimized by the moderator on the site
Perfect, thanks!
This comment was minimized by the moderator on the site
many thanks!
This comment was minimized by the moderator on the site
Yes.. Its worked Dude! Thanks!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations