Jak wyodrębnić tekst tylko z ciągu alfanumerycznego w programie Excel?
Kiedy masz długą listę wielu ciągów alfanumerycznych w każdej komórce w programie Excel i chcesz po prostu wyodrębnić z nich tylko ciągi tekstowe, możesz zrobić następujące sposoby, które przedstawiam.
Wyodrębnij tekst tylko z ciągu alfanumerycznego za pomocą funkcji zdefiniowanej w programie Excel
Wyodrębnij tekst tylko z ciągu alfanumerycznego za pomocą Kutools for Excel
Wyodrębnij tekst tylko z ciągu alfanumerycznego za pomocą funkcji zdefiniowanej w programie Excel
Użyj funkcji zdefiniowanej, aby wyodrębnić tekst tylko z ciągu alfanumerycznego w programie Excel, wykonując następujące czynności:
1. Wybierz komórkę kolumny, którą chcesz zaznaczyć i naciśnij Alt + F11 otworzyć Microsoft Visual Basic for Applications okno.
2. W wyskakującym okienku kliknij wstawka > Moduł, a następnie wklej następujący kod VBA do modułu.
VBA: wyodrębnij tylko tekst
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. Zapisz kod i zamknij okno, a następnie wpisz tę formułę = TextOnly (A1) (A1 to pierwsza komórka wiersza w zakresie listy, z której chcesz wyodrębnić tylko tekst) do pustej komórki, naciśnij Wchodzę przycisk, a następnie wypełnij uchwyt do żądanego zakresu.
Wyodrębnij tekst tylko z ciągu alfanumerycznego za pomocą Kutools for Excel
Kutools dla programu Excel's Usuń znaki Funkcja może również pomóc w wyodrębnieniu tekstu tylko w programie Excel.
Kutools dla programu Excel zawiera ponad 300 przydatnych narzędzi programu Excel. Bezpłatne wypróbowanie bez ograniczeń w ciągu 30 dni. Pobierz teraz
1. Wybierz zakres, z którego chcesz wyodrębnić tylko tekst, i kliknij Kutools > Narzędzia tekstowe > Usuń znaki. Zobacz zrzut ekranu:
2. w Usuń znaki okno dialogowe, sprawdź Numeryczne i Niedrukowane pola wyboru. Zobacz zrzut ekranu:
3. kliknij Ok, następnie wszystkie znaki nietekstowe są usuwane, patrz zrzut ekranu:
Wskazówka: Ponieważ to zastosowanie spowoduje zmianę oryginalnych danych, lepiej najpierw skopiować oryginalne dane w inne miejsce.
Więcej informacji na temat usuwania znaków.
Względne artykuły:
Najlepsze narzędzia biurowe
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...
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!