Excel usuwa znaki, słowa, cyfry z ciągów tekstowych

Przypuśćmy, że masz długą listę ciągów tekstowych, które zawierają znaki, cyfry lub inne specyficzne symbole. W niektórych przypadkach może być konieczne usunięcie niektórych znaków na podstawie pozycji, na przykład z prawej, lewej lub środkowej części ciągów tekstowych, lub usunięcie niektórych niechcianych znaków, cyfr z listy ciągów. Znalezienie rozwiązań jeden po drugim przysporzy Ci bólu głowy, ten samouczek zbiera wszelkiego rodzaju metody usuwania znaków, słów lub liczb w programie Excel.

---

Usuń znaki z lewej, prawej lub środkowej części ciągu tekstowego

Usunięcie niektórych znaków z lewej, prawej lub środkowej części ciągów tekstowych w arkuszach programu Excel może być powszechną pracą dla większości z nas. W tej sekcji przedstawimy kilka szybkich i łatwych sztuczek, które pomogą rozwiązać to zadanie.

1.1 Usuń pierwsze n znaków z ciągów tekstowych

Jeśli chcesz usunąć pierwsze n znaków z listy ciągów tekstowych, poniższe metody mogą wyświadczyć ci przysługę.

 Używając formuł

Zwykle, aby usunąć znaki z początku ciągów tekstowych, można użyć funkcji REPLACE lub kombinacji funkcji RIGHT i LEN.

Funkcja REPLACE do usunięcia pierwszych N znaków:

• ciąg: ciąg tekstowy, z którego chcesz usunąć znaki;
• liczba_znaków: Liczba znaków, które chcesz usunąć.

Na przykład, aby usunąć pierwsze 2 znaki z komórek, użyj poniższej formuły, a następnie przeciągnij uchwyt wypełniania, aby skopiować formułę do innych komórek, patrz zrzut ekranu:

Funkcje RIGHT i LEN do usuwania pierwszych N znaków:

• ciąg: ciąg tekstowy, z którego chcesz usunąć znaki;
• liczba_znaków: Liczba znaków, które chcesz usunąć.

Aby usunąć pierwsze 2 znaki z komórek, zastosuj następującą formułę:

---

 Korzystając z funkcji zdefiniowanej przez użytkownika

Aby usunąć pierwsze n znaków z komórek, możesz również utworzyć funkcję zdefiniowaną przez użytkownika, aby rozwiązać to zadanie. Wykonaj następujące czynności:

1. Przytrzymaj Alt + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod w oknie modułu.

Kod VBA: usuń pierwsze n znaków z ciągów tekstowych

Function removeFirstx(rng As String, cnt As Long)
'Updateby Extendoffice
removeFirstx = Right(rng, Len(rng) - cnt)
End Function

3. Następnie wróć do arkusza i wprowadź następującą formułę: = removefirstx (A4,2) do pustej komórki, a następnie przeciągnij uchwyt wypełniania w dół, aby uzyskać wyniki zgodnie z potrzebami, patrz zrzut ekranu:

Note: W tym wzorze: A4 to komórka, z której chcesz usunąć znaki; Numer 2 wskazuje liczbę znaków, które chcesz usunąć z początku ciągu tekstowego.

---

1.2 Usuń ostatnie n znaków z ciągów tekstowych

Aby usunąć określoną liczbę znaków z prawej strony ciągów tekstowych, możesz również użyć formuły lub funkcji zdefiniowanej przez użytkownika.

 Używając formuły

Aby usunąć ostatnie n znaków z ciągów tekstowych, możesz użyć formuły opartej na funkcjach LEFT i LEN.

Funkcje LEFT i LEN do usuwania ostatnich N znaków:

• ciąg: ciąg tekstowy, z którego chcesz usunąć znaki;
• liczba_znaków: Liczba znaków, które chcesz usunąć.

Aby usunąć 3 znaki z końca ciągów tekstowych, użyj tej formuły, a następnie przeciągnij uchwyt wypełniania, aby skopiować formułę do innych komórek, zobacz zrzut ekranu:

---

 Korzystając z funkcji zdefiniowanej przez użytkownika

Tutaj funkcja zdefiniowana przez użytkownika może również pomóc w usunięciu ostatnich n znaków z listy komórek, wykonaj następujące czynności:

1. Przytrzymaj Alt + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod w oknie modułu.

Kod VBA: usuń ostatnie n znaków z ciągów tekstowych

Function removeLastx(rng As String, cnt As Long)
'Updateby Extendoffice
removeLastx = Left(rng, Len(rng) - cnt)
End Function

3. Następnie wróć do arkusza roboczego i wprowadź tę formułę: = removelastx (A4,3) do pustej komórki, a następnie przeciągnij uchwyt wypełniania w dół, aby uzyskać wyniki zgodnie z potrzebami, patrz zrzut ekranu:

Note: W tym wzorze: A4 to komórka, z której chcesz usunąć znaki; Numer 3 wskazuje liczbę znaków, które chcesz usunąć z końca ciągu tekstowego.

---

1.3 Usuń pierwsze, ostatnie n znaków lub niektóre znaki pozycji za pomocą potężnej funkcji

Bolesne może być dla Ciebie zapamiętywanie różnych formuł, usuwanie znaków z lewej, prawej lub określonej pozycji ciągów tekstowych, Kutools dla programu Excel obsługuje potężną funkcję – Usuń według pozycji. Dzięki temu małemu narzędziu możesz wykonać te zadania za pomocą kilku kliknięć, nie pamiętając żadnych formuł.

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

1. Wybierz komórki, z których chcesz usunąć znaki, a następnie kliknij Kutools > Tekst > Usuń według pozycjizobacz zrzut ekranu:

2, w Usuń według pozycji w oknie dialogowym, wykonaj następujące operacje:

2.1 Usuń pierwsze n znaków z komórek:

• In Liczby wpisz liczbę znaków, które chcesz usunąć z ciągów. W tym przykładzie usunę pierwsze 2 znaki.
• Wybierz Od lewej opcja w Pozycja
• Następnie kliknij Ok or Aplikuj przycisk, aby uzyskać wynik, jak pokazano na poniższym zrzucie ekranu.

2.2 Usuń ostatnie n znaków z komórek:

• In Liczby wpisz liczbę znaków, które chcesz usunąć z ciągów. W tym przykładzie usunę ostatnie 3 znaki.
• Wybierz Od prawej opcja w Pozycja
• Następnie kliknij Ok or Aplikuj przycisk, aby uzyskać wynik, jak pokazano na poniższym zrzucie ekranu.

2.3 Usuń n znaków z określonej pozycji komórek:

Jeśli chcesz usunąć określoną liczbę znaków z określonej pozycji ciągu tekstowego, na przykład usunięcie 3 znaków zaczyna się od trzeciego znaku ciągu.

• In Liczby wpisz liczbę znaków, które chcesz usunąć z ciągów. W tym przykładzie usunę 3 znaki z określonej pozycji.
• Wybierz Sprecyzować i wpisz numer, od którego chcesz usunąć znaki, w polu tekstowym Pozycja Sekcja. Tutaj usunę znaki z trzeciego znaku.
• Następnie kliknij Ok or Aplikuj przycisk, aby uzyskać wynik, jak pokazano na poniższym zrzucie ekranu.

Pobierz i bezpłatną wersję próbną Kutools dla programu Excel teraz!

---

1.4 Usuń zarówno pierwsze n, jak i ostatnie n znaków z ciągów tekstowych za pomocą formuły

Gdy musisz usunąć niektóre znaki po obu stronach ciągów tekstowych w programie Excel, możesz połączyć funkcje MID i LEN, aby utworzyć formułę do radzenia sobie z tym zadaniem.

• ciąg: ciąg tekstowy, z którego chcesz usunąć znaki;
• left_znaki: Liczba znaków do usunięcia z lewej strony;
• prawo_znaków: Liczba znaków do usunięcia z prawej strony.

Na przykład, musisz jednocześnie usunąć pierwsze 7 znaków i ostatnie 5 znaków z ciągów tekstowych, wprowadź następującą formułę w pustej komórce:

Note: W tym wzorze: A4 to komórka, z której chcesz usunąć znaki; Numer 7 to liczba znaków, które chcesz usunąć z lewej strony; Numer 5 to liczba znaków, które chcesz usunąć z prawej strony.

A następnie przeciągnij uchwyt wypełniania w dół do miejsca, w którym chcesz zastosować tę formułę, a otrzymasz wynik, jak pokazano na poniższym zrzucie ekranu:

---

Usuń niechciane/specjalne znaki z ciągów tekstowych

Podczas importowania danych z innego miejsca do programu Excel do arkusza roboczego może zostać wklejonych wiele znaków specjalnych lub niechcianych. Aby usunąć te niechciane znaki, takie jak #@$%^&, spacje, cyfry, liczby nieliczbowe, podziały wierszy itp., w tej sekcji znajdziesz przydatne metody.

2.1 Usuń niektóre znaki specjalne z ciągów tekstowych

Jeśli w ciągach tekstowych znajdują się znaki specjalne, takie jak %^&*(), aby usunąć ten typ znaków, możesz zastosować poniższe trzy sztuczki.

 Usuń kilka znaków specjalnych z ciągów tekstowych za pomocą funkcji SUBSTITUTE

Zwykle w programie Excel można zagnieździć kilka funkcji SUBSTITUTE, aby zastąpić każdy konkretny znak niczym, ogólna składnia to:

• ciąg_komórki: komórka zawiera ciąg tekstowy, z którego chcesz usunąć znaki specjalne;
• znak1, znak2, znak3: niechciane znaki, które chcesz usunąć.

Teraz skopiuj lub wprowadź poniższą formułę do pustej komórki:

A następnie przeciągnij uchwyt wypełniania w dół do komórek, w których chcesz zastosować tę formułę, a wszystkie określone przez Ciebie niechciane znaki zostaną natychmiast usunięte, patrz zrzut ekranu:

Tips: Jeśli chcesz usunąć więcej znaków, wystarczy zagnieździć więcej funkcji SUBSTITUTE w formule.

---

 Usuń wiele znaków specjalnych z ciągów tekstowych za pomocą funkcji zdefiniowanej przez użytkownika

Powyższe zagnieżdżone funkcje SUBSTITUTE działają dobrze, jeśli istnieje kilka znaków specjalnych do usunięcia, ale jeśli masz dziesiątki znaków do usunięcia, formuła stanie się zbyt długa i trudna do zarządzania. W takim przypadku poniższa funkcja zdefiniowana przez użytkownika może pomóc w szybkim i łatwym wykonaniu tego zadania.

1. Przytrzymaj Alt + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod do okna modułu.

Kod VBA: usuń wiele znaków specjalnych z ciągów tekstowych

Function RemoveUnwantedChars(Str As String, xchars As String)
'Updateby Extendoffice
    For Index = 1 To Len(xchars)
        Str = Replace(Str, Mid(xchars, Index, 1), "")
    Next
    RemoveUnwantedChars = Str
End Function

3. Następnie zamknij okno kodu i wróć do arkusza roboczego, wprowadź tę formułę = UsuńNiechciane Znaki(A2, $D$2) do pustej komórki, w której wyprowadzić wynik, a następnie przeciągnij uchwyt wypełniania w dół, aby uzyskać potrzebne wyniki, patrz zrzut ekranu:

Note: W powyższym wzorze: A2 to komórka, z której chcesz usunąć znaki; 2 $ D $ zawiera znaki specjalne, które chcesz usunąć (możesz wpisać dowolne inne znaki specjalne, których potrzebujesz).

---

 Usuń wiele znaków specjalnych z ciągów tekstowych dzięki niesamowitej funkcji

Jeśli masz zainstalowany Kutools dla programu Excel, Z siedzibą w Usuń znaki funkcja, możesz usuwać wszelkiego rodzaju znaki, takie jak znaki numeryczne, znaki alfanumeryczne, znaki niedrukowalne… z listy komórek, zgodnie z potrzebami.

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

1. Wybierz zakres komórek, z których chcesz usunąć znaki specjalne, a następnie kliknij Kutools > Tekst > Usuń znakizobacz zrzut ekranu:

2, w Usuń znaki Okno dialogowe:

• Kontrola Zamówienia Indywidualne opcja pod Usuń znaki
• A następnie wprowadź znaki specjalne w polu tekstowym, które chcesz usunąć.
• Następnie kliknij Ok or Aplikuj przycisk, aby usunąć określone znaki od razu. Zobacz zrzut ekranu:

Pobierz i bezpłatną wersję próbną Kutools dla programu Excel teraz!

---

2.2 Usuń wszystkie liczby z ciągów tekstowych

Jeśli masz listę ciągów tekstowych, które mieszają się z cyframi, literami i znakami specjalnymi, a teraz chcesz po prostu usunąć wszystkie liczby i zachować inne znaki. W tej sekcji znajdziesz kilka przydatnych sposobów, jak ci pomóc.

 Usuń liczby z ciągów tekstowych za pomocą funkcji SUBSTITUTE

W programie Excel zagnieżdżona funkcja SUBSTITUTE może pomóc zastąpić wszystkie liczby niczym, więc możesz użyć poniższej formuły, aby usunąć wszystkie liczby z komórek:

Następnie przeciągnij uchwyt wypełniania w dół do komórek, w których chcesz zastosować tę formułę, a wszystkie liczby zostaną usunięte z listy ciągów tekstowych, patrz zrzut ekranu:

---

 Usuń liczby z ciągów tekstowych za pomocą funkcji TEXTJOIN

Jeśli masz Excel 2019, 2021 lub 365, nowa funkcja TEXTJOIN może również pomóc w usuwaniu liczb z ciągów tekstowych.

Skopiuj następującą formułę do pustej komórki, a następnie naciśnij klawisze Ctrl + Shift + Enter, aby uzyskać pierwszy wynik:

A następnie skopiuj formułę do innych komórek poniżej, w których chcesz zastosować tę formułę, zobacz zrzut ekranu:

Note: To TEXTJOIN jest dostępne tylko w programach Excel 2019, 2021 i Office 365.

---

 Usuń liczby z ciągów tekstowych za pomocą funkcji zdefiniowanej przez użytkownika

Oprócz powyższych dwóch formuł funkcja zdefiniowana przez użytkownika może również wyświadczyć ci przysługę, wykonaj następujące czynności:

1. Przytrzymaj Alt + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod do okna modułu.

Kod VBA: usuń liczby z ciągów tekstowych

Function RemoveNumbers(Txt As String) As String
'Updateby Extendoffice
With CreateObject("VBScript.RegExp")
.Global = True
.Pattern = "[0-9]"
RemoveNumbers = .Replace(Txt, "")
End With
End Function

3. Następnie zamknij i wyjdź z okna kodu, wróć do arkusza roboczego i wprowadź tę formułę: = Usuń liczby (A2) do pustej komórki, a następnie przeciągnij uchwyt wypełniania w dół do komórek, w których chcesz zastosować tę formułę, zobacz zrzut ekranu:

---

 Usuń liczby z ciągów tekstowych za pomocą przydatnej opcji

Jeśli jesteś zmęczony skomplikowanymi formułami, teraz pokażę Ci proste narzędzie – Kutools dla programu Excel'S Usuń znaki. Dzięki tej przydatnej funkcji możesz wykonać to zadanie za pomocą zaledwie kilku kliknięć.

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

1. Wybierz zakres komórek, z których chcesz usunąć liczby, a następnie kliknij Kutools > Tekst > Usuń znaki.

2, w Usuń znaki w oknie dialogowym, wykonaj następujące operacje:

• Kontrola Numeryczne opcja pod Usuń znaki
• Następnie kliknij Ok or Aplikuj przycisk, aby natychmiast usunąć cyfry. Zobacz zrzut ekranu:

Pobierz i bezpłatną wersję próbną Kutools dla programu Excel teraz!

---

2.3 Usuń znaki nieliczbowe z ciągów tekstowych

Aby usunąć wszystkie znaki nieliczbowe i zachować tylko liczby z ciągów tekstowych, w tej sekcji omówiono niektóre sposoby rozwiązania tego zadania w programie Excel.

 Usuń znaki nieliczbowe z ciągów tekstowych za pomocą formuły w programie Excel 2016 i wcześniejszych wersjach

Jeśli używasz programu Excel 2016 lub wcześniejszych wersji, aby osiągnąć to zadanie, zastosuj złożoną formułę, skopiuj lub wprowadź poniższą formułę w pustej komórce:

A następnie skopiuj formułę do innych komórek poniżej, w których chcesz zastosować tę formułę, zobacz zrzut ekranu:

Note: Jeśli liczby w ciągu tekstowym zaczynają się od 0, 0 zostanie utracone.

---

 Usuń znaki nieliczbowe z ciągów tekstowych za pomocą funkcji TEKSTJOIN w programie Excel 2019, 2021, 365

Powyższa formuła może być dla większości z nas zbyt trudna do zrozumienia. Jeśli masz Excel 2019, 2021 lub 365, istnieje zgrabna formuła, która może Ci pomóc.

Skopiuj lub wprowadź następującą formułę do pustej komórki i naciśnij Ctrl + Shift + Enter klucze razem, aby uzyskać pierwszy poprawny wynik:

Następnie przeciągnij uchwyt wypełniania w dół do komórek, w których zastosujesz tę formułę, a otrzymasz wynik, jak pokazano na poniższym zrzucie ekranu:

Note: Dzięki tej formule widać, że wiodące zera zostaną zachowane, ponieważ liczby są zwracane jako tekst.

---

 Usuń znaki nieliczbowe z ciągów tekstowych za pomocą funkcji zdefiniowanej przez użytkownika

Oczywiście możesz również utworzyć własną funkcję zdefiniowaną przez użytkownika o prostszej składni, wykonaj następujące czynności:

1. Przytrzymaj Alt + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod do okna modułu.

Kod VBA: usuń znaki nieliczbowe z ciągów tekstowych

Function Removenonnumeric(str As String) As String
'Updateby Extendoffice
    With CreateObject("VBScript.RegExp")
        .Global = True
        .Pattern = "[^0-9]"
        Removenonnumeric = .Replace(str, "")
    End With
End Function

3. Następnie zamknij i wyjdź z okna kodu, wróć do arkusza roboczego i wprowadź tę formułę: =Usuńnieliczbowe(A2) do pustej komórki, a następnie przeciągnij uchwyt wypełniania w dół do komórek, w których chcesz zastosować tę formułę, tylko liczby zostaną wyodrębnione, jak pokazano na poniższym zrzucie ekranu:

---

 Usuń znaki nieliczbowe z ciągów tekstowych za pomocą prostej funkcji

Aby bezpośrednio usunąć znaki nieliczbowe z zakresu komórek, Kutools dla programu Excel'S Usuń znaki narzędzie może to zrobić za pomocą kilku kliknięć.

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

1. Wybierz zakres komórek, z którego chcesz usunąć znaki nieliczbowe, a następnie kliknij Kutools > Tekst > Usuń znaki.

2, w Usuń znaki w oknie dialogowym, ustaw następujące operacje:

• Kontrola Nieliczbowe opcja pod Usuń znaki
• Następnie kliknij Ok or Aplikuj przycisk, aby natychmiast usunąć wszystkie znaki nienumeryczne. Zobacz zrzut ekranu:

Pobierz i bezpłatną wersję próbną Kutools dla programu Excel teraz!

---

2.4 Oddziel tekst i liczby z jednej komórki na dwie kolumny

Czasami możesz chcieć wyodrębnić tekst i liczby z ciągów tekstowych do dwóch oddzielnych kolumn, za pomocą następujących metod możesz szybko i łatwo zakończyć to zadanie.

 Oddziel tekst i liczby z jednej komórki na dwie kolumny za pomocą funkcji zdefiniowanej przez użytkownika

Korzystając z następującej funkcji zdefiniowanej przez użytkownika, możesz wyodrębnić tekst i liczby jednocześnie, wykonaj poniższe czynności:

1. Przytrzymaj Alt + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod do okna modułu.

Kod VBA: oddziel tekst i liczby od ciągów tekstowych na dwie kolumny

Function SplitText(pWorkRng As Range, pIsNumber As Boolean) As String
'Updateby Extendoffice
Dim xLen As Long
Dim xStr As String
xLen = VBA.Len(pWorkRng.Value)
For i = 1 To xLen
    xStr = VBA.Mid(pWorkRng.Value, i, 1)
    If ((VBA.IsNumeric(xStr) And pIsNumber) Or (Not (VBA.IsNumeric(xStr)) And Not (pIsNumber))) Then
        SplitText = SplitText + xStr
    End If
Next
End Function

3. Następnie zamknij i wyjdź z okna kodu, wróć do arkusza roboczego i wprowadź tę formułę: = SplitText (A2; FALSE) do pustej komórki, a następnie przeciągnij uchwyt wypełniania w dół do komórek, które chcesz wypełnić tę formułę, aby uzyskać cały tekst, zobacz zrzut ekranu:

4. A następnie kontynuuj wpisywanie tej formuły: = SplitText (A2; TRUE) do innej komórki i przeciągnij uchwyt wypełniania w dół do komórek, które chcesz wypełnić tę formułę, aby uzyskać liczby, patrz zrzut ekranu:

---

 Oddziel tekst i liczby z jednej komórki na dwie kolumny za pomocą łatwej funkcji

Jeśli Kutools dla programu Excel, jego Podział komórki narzędzie może pomóc podzielić komórki na wiele kolumn lub wierszy na podstawie dowolnych separatorów, określonej szerokości lub tekstu i liczby.

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

1. Wybierz zakres komórek, które chcesz podzielić, a następnie kliknij Kutools > Połącz i podziel > Podział komórkizobacz zrzut ekranu:

2, w Podział komórki okno dialogowe, wybierz Podziel na kolumny opcja pod Rodzaj Nieruchomości a następnie sprawdź Tekst i numer z Podziel według sekcja, patrz zrzut ekranu:

3. Następnie kliknij Ok przycisk i jeszcze jeden Podział komórki pojawi się okno dialogowe, wybierz komórkę do wyprowadzenia oddzielonego tekstu i liczb, a następnie kliknij OK przycisk. Teraz możesz zobaczyć, że tekst i liczby w wybranych komórkach są podzielone na dwie kolumny jednocześnie, jak pokazano poniżej:

Pobierz i bezpłatną wersję próbną Kutools dla programu Excel teraz!

---

2.5 Usuń znaki końca linii z ciągów tekstowych

Podział wiersza to coś, co pozwala mieć wiele wierszy w tej samej komórce w programie Excel. Czasami, gdy kopiujesz dane ze strony lub oddzielasz zawartość komórki za pomocą Alt + Enter klawisze ręcznie, otrzymasz podziały linii lub powrót karetki. W niektórych przypadkach możesz chcieć usunąć podziały wierszy, aby zawartość komórki była jedną linią, jak pokazano na zrzucie ekranu. Tutaj przedstawię kilka sposobów rozwiązania tego zadania w Excelu.

 Usuń znaki końca wiersza z ciągów tekstowych za pomocą funkcji Znajdź i zamień

W programie Excel możesz użyć Znajdowanie i zamienianie funkcja usuwania łamania wierszy, wykonaj następujące czynności:

1. Wybierz zakres danych, z którego chcesz usunąć podziały wierszy.

2. Następnie kliknij Strona główna > Znajdź i wybierz > zastąpić (lub naciśnij Ctrl + H klawisze), aby przejść do Znajdowanie i zamienianie okno dialogowe, zobacz zrzut ekranu:

3. W wyskoczył Znajdowanie i zamienianie w oknie dialogowym, wykonaj następujące operacje:

• Umieść kursor w Znajdź co pole i naciśnij Ctrl + J na klawiaturze możesz nic nie widzieć, ale wstawiono znak łamania wiersza.
• W Wymień pole, pozostaw to pole puste, aby usunąć podziały wierszy lub naciśnij Przestrzeń bar raz, aby zastąpić łamanie wierszy spacjami.

4. Następnie kliknij Zamień wszystko przycisk, wszystkie podziały linii w wybranych komórkach zostaną jednocześnie usunięte lub zastąpione pustymi miejscami. Zobacz zrzut ekranu:

---

 Usuń znaki podziału wiersza z ciągów tekstowych za pomocą funkcji SUBSTITUTE

Możesz również utworzyć formułę opartą na funkcjach SUBSTITUTE i ZNAK, aby usunąć podziały wierszy z ciągów tekstowych.

Aby uzyskać wynik, zastosuj poniższą formułę:

Tips: Funkcja SUBSTITUTE znajduje i zastępuje znak ZNAK(10), który reprezentuje znak końca wiersza, na nic. Jeśli chcesz, aby wynik był oddzielony przecinkiem i spacją, możesz skorzystać z poniższej formuły:

---

 Usuń znaki podziału wiersza z ciągów tekstowych za pomocą kodu VBA

Jeśli nie masz nic przeciwko używaniu kodu VBA, tutaj znajdziesz również kod dla Ciebie, wykonaj następujące czynności:

1. Przytrzymaj Alt + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod do okna modułu.

Kod VBA: usuń podziały wierszy z ciągów tekstowych

Sub RemoveCarriage()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Rng.Value = Replace(Rng.Value, Chr(10), "")
Next
End Sub

3. Następnie naciśnij F5 klucz, aby uruchomić ten kod, a pojawi się okno dialogowe, wybierz zakres, z którego chcesz usunąć podziały wierszy, zobacz zrzut ekranu:

4. A następnie kliknij OK wszystkie znaki końca linii zostaną usunięte z wybranego zakresu danych.

---

 Usuń znaki podziału wiersza z ciągów tekstowych za pomocą inteligentnej opcji

Tutaj, Kutools dla programu Excel'S Usuń znaki funkcja może również pomóc z łatwością usunąć podziały wierszy.

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

1. Wybierz zakres komórek, w których chcesz usunąć podziały wierszy, a następnie kliknij Kutools > Tekst > Usuń znaki.

2, w Usuń znaki w oknie dialogowym, ustaw następujące operacje:

• Kontrola Niedrukowane opcja pod Usuń znaki
• Następnie kliknij Ok or Aplikuj przycisk, aby usunąć wszystkie znaki końca linii z wybranego zakresu danych. Zobacz zrzut ekranu:

Pobierz i bezpłatną wersję próbną Kutools dla programu Excel teraz!

---

2.6 Usuń spacje (początkowe, końcowe, dodatkowe lub wszystkie spacje) z ciągów tekstowych

Kopiowanie i wklejanie tekstu z zewnętrznego źródła do arkusza programu Excel często przynosi denerwujące resztki białych znaków, żmudne będzie ręczne usuwanie początkowych, końcowych lub innych dodatkowych spacji. Na szczęście Excel zapewnia kilka prostych sztuczek, które pomogą poradzić sobie z tym zadaniem.

 Usuń dodatkowe spacje (początkowe, końcowe, nadmiarowe) z ciągów tekstowych za pomocą funkcji TRIM

W programie Excel, aby usunąć początkowe, końcowe i dodatkowe spacje z ciągów tekstowych, może ci pomóc prosta funkcja TRIM. Ta funkcja usuwa wszystkie spacje z wyjątkiem pojedynczych spacji między słowami.

Wprowadź poniższą formułę do pustej komórki:

A następnie przeciągnij uchwyt wypełniania w dół, aby skopiować formułę dla innych komórek, teraz możesz zobaczyć, że wszystkie wiodące, końcowe spacje i dodatkowe spacje między słowami są natychmiast usuwane ze zrzutu ekranu:

---

 Usuń wszystkie spacje z ciągów tekstowych

Jeśli chcesz usunąć wszystkie spacje z ciągów tekstowych, poniższa funkcja SUBSTITUTE i funkcja Znajdź i zamień mogą wyświadczyć ci przysługę.

Używając funkcji SUBSTITUTE

Możesz użyć funkcji SUBSTITUTE, aby zastąpić wszystkie spacje niczym, zastosuj poniższą formułę do pustej komórki:

Następnie przeciągnij uchwyt wypełniania w dół, aby skopiować tę formułę do innych potrzebnych komórek, a wszystkie spacje zostaną usunięte, jak pokazano na poniższym zrzucie ekranu:

---

Korzystając z funkcji Znajdź i zamień

W rzeczywistości Znaleźć zamiennik funkcja w programie Excel może również pomóc pozbyć się wszystkich spacji z wybranych komórek, wykonaj następujące czynności:

1. Wybierz zakres danych, z którego chcesz usunąć wszystkie spacje.

2. Następnie kliknij Strona główna > Znajdź i wybierz > zastąpić (lub naciśnij Ctrl + H klawisze), aby przejść do Znajdowanie i zamienianie w otwartym oknie dialogowym Znajdowanie i zamienianie w oknie dialogowym, wykonaj poniższe czynności:

• Naciśnij przycisk Spacja Znajdź co pole;
• W Wymień pole, pozostaw to pole puste.

3. A następnie kliknij Zamień wszystko przycisk, wszystkie białe znaki w wybranych komórkach zostaną usunięte jednocześnie. Zobacz zrzut ekranu:

---

 Usuń wszelkiego rodzaju spacje z ciągów tekstowych za pomocą potężnej funkcji

Kutools dla programu Excel ma potężną funkcję – Usuń spacje, za pomocą tego narzędzia możesz nie tylko usuwać spacje wiodące, spacje końcowe, nadmiarowe spacje, ale także wszystkie spacje z wybranych zakresów w jednym oknie dialogowym, co zwiększy Twoją wydajność pracy.

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

1. Wybierz zakres danych, z którego chcesz usunąć spacje, a następnie kliknij Kutools > Tekst > Usuń spacje. Zobacz zrzut ekranu:

2, w Usuń spacje w oknie dialogowym wybierz jeden typ przestrzeni, który chcesz usunąć z Typ przestrzeni:

• Usuń początkowe spacje, wybierz Wiodące przestrzenie opcja;
• Usuń końcowe spacje, wybierz Spacje końcowe opcja;
• Usuń jednocześnie spacje wiodące i spacje końcowe, wybierz Spacje wiodące i końcowe opcja;
• Usuń wszystkie dodatkowe spacje, wybierz Wszystkie nadmiarowe przestrzenie opcja;
• Usuń wszystkie spacje, wybierz Wszystkie przestrzenie opcja.

3. Następnie kliknij Ok or Aplikuj przycisk, otrzymasz wynik, którego potrzebujesz.

Pobierz i bezpłatną wersję próbną Kutools dla programu Excel teraz!

---

Usuń znaki / tekst przed lub po określonym znaku

W tej sekcji przedstawię kilka operacji usuwania tekstu lub znaków przed lub po pierwszym, ostatnim lub n-tym wystąpieniu określonego znaku.

3.1 Usuń tekst przed lub po pierwszym określonym znaku

Jeśli chcesz usunąć tekst przed lub po pierwszym określonym znaku, takim jak spacja, przecinek z listy ciągów tekstowych, jak pokazano na poniższym zrzucie ekranu, tutaj opublikuję dwie metody.

 Usuń tekst przed pierwszym określonym znakiem za pomocą formuły

Aby usunąć tekst lub znaki przed pierwszym określonym znakiem, możesz utworzyć formułę opartą na funkcjach RIGHT, LEN i FIND, ogólna składnia to:

• komórka: odwołanie do komórki lub ciąg tekstowy, z którego chcesz usunąć tekst;
• zwęglać: Określony separator, na podstawie którego chcesz usunąć tekst.

Na przykład, aby usunąć wszystko przed pierwszym przecinkiem z ciągów listy, należy zastosować następującą formułę do pustej komórki, a następnie przeciągnąć ją do potrzebnych komórek, patrz zrzut ekranu:

Note:W powyższym wzorze: A2 to komórka, z której chcesz usunąć tekst; , to konkretny znak, na podstawie którego chcesz usunąć tekst, możesz go zmienić na dowolne inne znaki, jeśli potrzebujesz.

---

 Usuń tekst po pierwszym określonym znaku za pomocą formuły

Aby usunąć wszystko po pierwszym określonym znaku, możesz użyć funkcji LEWO i ZNAJDŹ, aby uzyskać wynik, ogólna składnia to:

• komórka: odwołanie do komórki lub ciąg tekstowy, z którego chcesz usunąć tekst;
• zwęglać: Określony separator, na podstawie którego chcesz usunąć tekst.

Teraz wprowadź poniższą formułę do pustej komórki, a następnie przeciągnij uchwyt wypełniania w dół do innych komórek, w których chcesz zastosować tę formułę, a wszystkie znaki po pierwszym przecinku zostaną natychmiast usunięte, patrz zrzut ekranu:

---

3.2 Usuń tekst przed lub po N-tym wystąpieniu znaku

Czasami ciągi tekstowe zawierają wiele wystąpień określonego ogranicznika, możesz chcieć usunąć wszystkie znaki przed lub po określonym wystąpieniu, takim jak drugie, trzecie lub czwarte, w zależności od potrzeb. Aby poradzić sobie z tego rodzaju usuwaniem, możesz użyć następujących sztuczek:

 Usuń tekst przed N-tym wystąpieniem znaku z formułą

Aby usunąć tekst przed N-tym wystąpieniem określonego znaku, może ci pomóc następująca formuła, ogólna składnia to:

• komórka: odwołanie do komórki lub ciąg tekstowy, z którego chcesz usunąć tekst;
• zwęglać: Określony separator, na podstawie którego chcesz usunąć tekst;
• N: Wystąpienie znaku, przed którym należy usunąć tekst.

Na przykład, aby usunąć wszystko przed drugim przecinkiem z ciągów tekstowych, należy zastosować poniższą formułę:

Note:W powyższym wzorze: A2 to komórka, z której chcesz usunąć tekst; , jest konkretną postacią, na podstawie której chcesz usunąć tekst, możesz ją zmienić na dowolne inne znaki, jeśli potrzebujesz; 2 wskazuje n-ty przecinek, przed którym chcesz usunąć tekst.

A następnie przeciągnij uchwyt wypełniania, aby skopiować formułę do innych komórek, zobacz zrzut ekranu:

---

 Usuń tekst po N-tym wystąpieniu znaku z formułą

Aby usunąć tekst po N-tym wystąpieniu określonego separatora, funkcje LEFT, SUBSTITUTE i FIND mogą wyświadczyć ci przysługę. Ogólna składnia to:

• komórka: odwołanie do komórki lub ciąg tekstowy, z którego chcesz usunąć tekst;
• zwęglać: Określony separator, na podstawie którego chcesz usunąć tekst;
• N: Wystąpienie znaku, po którym należy usunąć tekst.

Gdy zrozumiesz podstawową składnię, skopiuj lub wprowadź poniższą formułę do pustej komórki:

Note:W powyższym wzorze: A2 to komórka, z której chcesz usunąć tekst; , jest konkretną postacią, na podstawie której chcesz usunąć tekst, możesz ją zmienić na dowolne inne znaki, jeśli potrzebujesz; 2 wskazuje n-ty przecinek, po którym chcesz usunąć tekst.

Następnie przeciągnij uchwyt wypełniania, aby skopiować formułę do innych komórek, a wszystkie znaki po drugim przecinku zostaną natychmiast usunięte, patrz zrzut ekranu:

---

 Usuń tekst przed lub po N-tym wystąpieniu znaku za pomocą funkcji zdefiniowanej przez użytkownika

Jak widać, możesz rozwiązać przypadki usuwania tekstu przed lub po N-tym wystąpieniu znaku, używając natywnych funkcji programu Excel w różnych kombinacjach. Problem polega na tym, że musisz zapamiętać te podchwytliwe formuły. W takim przypadku utworzę funkcję zdefiniowaną przez użytkownika, która obejmie wszystkie scenariusze, wykonaj następujące czynności:

1. Przytrzymaj Alt + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod do okna modułu.

Kod VBA: Usuń tekst przed lub po N-tym wystąpieniu znaku

Function RemoveTextOccurrence(Str As String, Delimiter As String, Occurrence As Integer, IsAfter As Boolean)
Dim xStr As String
Dim xStrLen, xF, xIntStart As Integer
xStr = Str
xStrLen = Len(xStr)
xIntStart = 1
For xF = 1 To Occurrence
xIntStart = InStr(xIntStart + 1, xStr, Delimiter, vbTextCompare)
If (xIntStart = 0) Or (xIntStart < 0) Then
    If IsAfter Then
    RemoveTextOccurrence = xStr
    Else
    RemoveTextOccurrence = ""
    End If
    Exit Function
End If
Next
If IsAfter Then
    RemoveTextOccurrence = Mid(Str, 1, xIntStart - 1)
Else
    RemoveTextOccurrence = Mid(Str, xIntStart + 1)
End If
End Function

3. Następnie zamknij i wyjdź z okna kodu, wróć do arkusza roboczego, użyj następujących formuł:

Usuń tekst przed drugim wystąpieniem przecinka:

Usuń tekst po drugim wystąpieniu przecinka

---

3.3 Usuń tekst przed lub po ostatnim wystąpieniu znaku

Jeśli chcesz usunąć cały tekst przed lub po ostatnim określonym znaku i pozostawić podciągi tylko po lub przed ostatnim określonym znakiem, jak pokazano na poniższym zrzucie ekranu, w tej sekcji zostaną omówione niektóre formuły rozwiązania tego problemu.

 Usuń tekst przed ostatnim wystąpieniem znaku z formułą

Aby usunąć wszystkie znaki przed ostatnim wystąpieniem znaku, ogólna składnia to:

• komórka: odwołanie do komórki lub ciąg tekstowy, z którego chcesz usunąć tekst;
• zwęglać: Określony separator, na podstawie którego chcesz usunąć tekst;

Teraz, jeśli chcesz usunąć tekst przed ostatnim wystąpieniem przecinka, skopiuj lub wprowadź poniższą formułę do pustej komórki:

Note:W powyższym wzorze: A2 to komórka, z której chcesz usunąć tekst; , to konkretny znak, na podstawie którego chcesz usunąć tekst, możesz go zmienić na dowolne inne znaki, jeśli potrzebujesz.

Następnie przeciągnij uchwyt wypełniania, aby skopiować formułę do innych komórek, a wszystkie znaki przed ostatnim przecinkiem zostaną usunięte, jak pokazano na poniższym zrzucie ekranu:

---

 Usuń tekst po ostatnim wystąpieniu znaku z formułami

Jeśli wartości komórek są oddzielone zmienną liczbą ograniczników, teraz chcesz usunąć wszystko po ostatnim wystąpieniu tego ogranicznika, ogólna składnia to:

• komórka: odwołanie do komórki lub ciąg tekstowy, z którego chcesz usunąć tekst;
• zwęglać: Określony separator, na podstawie którego chcesz usunąć tekst;

Skopiuj lub wprowadź poniższą formułę do pustej komórki, a następnie przeciągnij uchwyt wypełniania w dół, aby uzyskać inne potrzebne wyniki, zobacz zrzut ekranu:

Note:W powyższym wzorze: A2 to komórka, z której chcesz usunąć tekst; , to konkretny znak, na podstawie którego chcesz usunąć tekst, możesz go zmienić na dowolne inne znaki, jeśli potrzebujesz.

---

3.4 Usuń tekst między nawiasami

Jeśli masz listę ciągów tekstowych z częścią znaków ujętych w nawiasach, teraz możesz usunąć wszystkie znaki w nawiasach, w tym same nawiasy, jak pokazano na poniższym zrzucie ekranu. W tej sekcji omówimy kilka sztuczek dotyczących rozwiązania tego zadania w programie Excel.

 Usuń tekst między nawiasami za pomocą funkcji Znajdź i zamień

W programie Excel wbudowana funkcja Znajdź i zamień może pomóc znaleźć wszystkie teksty w nawiasach, a następnie zastąpić je niczym. Proszę zrób tak:

1. Wybierz listę danych, z której chcesz usunąć teksty w nawiasach.

2. Następnie kliknij Strona główna > Znajdź i wybierz > zastąpić (lub naciśnij Ctrl + H klawisze), aby przejść do okna dialogowego Znajdź i zamień, w Znajdowanie i zamienianie w oknie dialogowym wykonaj następujące operacje:

• W Znajdź co typ pola (*) do pola tekstowego;
• W Wymień pole, pozostaw to pole puste.

3. Następnie kliknij Zamień wszystko wszystkie znaki w nawiasach (w tym nawiasy) w zaznaczonych komórkach zostaną natychmiast usunięte. Zobacz zrzut ekranu:

Tips: the Znajdowanie i zamienianie funkcja działa również dla dwóch lub więcej par nawiasów w ciągu tekstowym.

---

 Usuń tekst między nawiasami za pomocą formuły

Oprócz funkcji Znajdź i zamień możesz również użyć formuły do ​​rozwiązania tego zadania w programie Excel, ogólna składnia to:

• XNUMX: ciąg tekstowy lub odwołanie do komórki, z którego chcesz usunąć znaki.

Teraz skopiuj lub wprowadź następującą formułę do pustej komórki, w której chcesz uzyskać wynik:

Następnie przeciągnij uchwyt wypełniania w dół do komórek, w których chcesz zastosować tę formułę, a wszystkie teksty w nawiasach, w tym nawiasy, zostaną natychmiast usunięte, patrz zrzut ekranu:

Tips: Jeśli w wartości komórki nie ma nawiasów, po zastosowaniu powyższej formuły zostanie wyświetlony błąd, aby zignorować błąd, użyj poniższej formuły:

---

 Usuń tekst między nawiasami za pomocą funkcji zdefiniowanej przez użytkownika

Powyższa formuła działa dobrze w przypadku usuwania tekstu z jednej pary nawiasów, jeśli musisz usunąć teksty z wielu par nawiasów w ciągu tekstowym, formuła nie będzie działać poprawnie. Tutaj stworzę prostą funkcję zdefiniowaną przez użytkownika, aby rozwiązać to zadanie.

1. Przytrzymaj Alt + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod do okna modułu.

Kod VBA: usuń tekst między nawiasami

Function remtxt(ByVal str As String) As String
'Updateby Extendoffice
  While InStr(str, "(") > 0 And InStr(str, ")") > InStr(str, "(")
    str = Left(str, InStr(str, "(") - 1) & Mid(str, InStr(str, ")") + 1)
  Wend
  remtxt = Trim(str)
End Function

3. Następnie wróć do arkusza roboczego i wprowadź tę formułę do pustej komórki: = remtxt (A2), a następnie przeciągnij uchwyt wypełniania w dół do komórek, w których chcesz zastosować tę formułę, wszystkie teksty we wszystkich nawiasach, w tym nawiasy, zostaną usunięte, jak pokazano na poniższym zrzucie ekranu:

---

Usuń słowa z ciągów tekstowych

W niektórych przypadkach możesz chcieć usunąć niektóre słowa z listy komórek, takie jak pierwsze lub ostatnie słowo, zduplikowane słowa z komórki. Aby rozwiązać ten rodzaj usuwania, w tej sekcji przedstawimy kilka metod.

4.1 Usuń pierwsze lub ostatnie słowo z ciągu tekstowego

Aby usunąć pierwsze lub ostatnie słowo z listy ciągów tekstowych, możesz skorzystać z następujących formuł.

 Usuń pierwsze słowo z ciągu tekstowego za pomocą formuły

Usuń pierwsze słowa z listy ciągów tekstowych, możesz utworzyć prostą formułę opartą na funkcjach RIGHT, LEN i FIND, ogólna składnia to:

• XNUMX: ciąg tekstowy lub odwołanie do komórki, z którego chcesz usunąć pierwsze słowo.

Teraz wprowadź lub skopiuj następującą formułę do pustej komórki:

A następnie przeciągnij uchwyt wypełniania w dół, aby zastosować formułę do innych komórek, zobacz zrzut ekranu:

Tips: Jeśli chcesz usunąć pierwsze N ​​słów z komórek, użyj poniższej formuły:

• XNUMX: ciąg tekstowy lub odwołanie do komórki, z którego chcesz usunąć pierwsze n słów;
• N: Wskazuje, ile słów chcesz usunąć z początku ciągu tekstowego.

Na przykład, aby usunąć pierwsze dwa słowa z komórek, skopiuj lub wprowadź poniższą formułę do pustej komórki, aby uzyskać żądany wynik, patrz zrzut ekranu:

---

  Usuń ostatnie słowo z ciągu tekstowego za pomocą formuły

Aby usunąć ostatnie słowo z ciągów tekstowych, możesz również użyć formuły do ​​rozwiązania tego zadania, ogólna składnia to:

• XNUMX: ciąg tekstowy lub odwołanie do komórki, z którego chcesz usunąć ostatnie słowo;

Użyj poniższej formuły do ​​pustej komórki, a następnie przeciągnij uchwyt wypełniania w dół, aby zastosować formułę do innych komórek, patrz zrzut ekranu:

Tips: Aby usunąć ostatnie N słów z listy komórek, ogólna składnia to:

• XNUMX: ciąg tekstowy lub odwołanie do komórki, z którego chcesz usunąć ostatnie n słów;
• N: Wskazuje liczbę słów, które chcesz usunąć z końca ciągu tekstowego.

Przypuśćmy, że aby usunąć ostatnie 3 słowa z listy komórek, użyj poniższej formuły, aby zwrócić wynik, patrz zrzut ekranu:

---

4.2 Usuń zduplikowane znaki lub słowa w komórce

Podczas usuwania zduplikowanych wartości lub wierszy program Excel oferuje różne opcje, ale jeśli chodzi o usuwanie niektórych zduplikowanych znaków lub słów w danej komórce, może nie być żadnej dobrej wbudowanej funkcji do jej rozwiązania. W takim przypadku ta sekcja pomoże stworzyć kilka funkcji zdefiniowanych przez użytkownika, aby poradzić sobie z tą zagadką.

 Usuń zduplikowane znaki w komórce za pomocą funkcji zdefiniowanej przez użytkownika

Jeśli masz wiele wystąpień tego samego znaku w komórce, aby usunąć zduplikowane znaki w komórce i zachować tylko pierwsze wystąpienia, jak pokazano na poniższym zrzucie ekranu, możesz użyć następującej funkcji zdefiniowanej przez użytkownika.

1. Przytrzymaj Alt + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod do okna modułu.

Kod VBA: usuń zduplikowane znaki w komórce

Function RemoveDupeschars(pWorkRng As Range) As String
'Updateby Extendoffice
Dim xValue As String
Dim xChar As String
Dim xOutValue As String
Set xDic = CreateObject("Scripting.Dictionary")
xValue = pWorkRng.Value
For i = 1 To VBA.Len(xValue)
    xChar = VBA.Mid(xValue, i, 1)
    If xDic.Exists(xChar) Then
    Else
        xDic(xChar) = ""
        xOutValue = xOutValue & xChar
    End If
Next
RemoveDupeschars = xOutValue
End Function

3. Następnie zamknij okno kodu, wróć do arkusza roboczego i wprowadź tę formułę =UsuńDupeznaki(A2) do pustej komórki oprócz danych, a następnie przeciągnij uchwyt wypełniania do komórek, do których chcesz zastosować tę formułę, zobacz zrzut ekranu:

Note: A2 to komórka danych, z której chcesz usunąć zduplikowane znaki.

Wskazówka: Funkcja rozróżnia wielkość liter, więc traktuje małe i duże litery jako różne znaki.

---

 Usuń zduplikowane słowa w komórce za pomocą funkcji zdefiniowanej przez użytkownika

Zakładając, że masz te same słowa lub ciągi tekstowe w komórce i chciałbyś usunąć wszystkie te same słowa z komórki, jak pokazano na zrzucie ekranu. Aby rozwiązać to zadanie w programie Excel, możesz użyć następującej funkcji zdefiniowanej przez użytkownika.

1. Przytrzymaj Alt + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod do okna modułu.

Kod VBA: usuń zduplikowane słowa w komórce

Function RemoveDupeswords(txt As String, Optional delim As String = " ") As String
'Updateby Extendoffice
    Dim x
    With CreateObject("Scripting.Dictionary")
        .CompareMode = vbTextCompare
        For Each x In Split(txt, delim)
            If Trim(x) <> "" And Not .exists(Trim(x)) Then .Add Trim(x), Nothing
        Next
        If .Count > 0 Then RemoveDupeswords = Join(.keys, delim)
    End With
End Function

3. Następnie zamknij okno kodu, wróć do arkusza roboczego i wprowadź tę formułę =UsuńDupeswords(A2,", ") do pustej komórki oprócz danych, a następnie przeciągnij uchwyt wypełniania do komórek, do których chcesz zastosować tę formułę, zobacz zrzut ekranu:

Note: A2 to komórka, z której chcesz usunąć zduplikowane słowa, oraz przecinek i spację (, ) są ogranicznikami oddzielającymi ciągi tekstowe, możesz je zmienić na dowolne inne ograniczniki według własnych potrzeb.

Wskazówka: Ta funkcja nie rozróżnia wielkości liter, małe i duże litery są traktowane jako te same znaki.

---

4.3 Przytnij ciąg tekstowy do N słów

Jeśli masz w komórce długi ciąg tekstowy, czasami możesz chcieć przyciąć ciąg tekstowy do określonej liczby słów, co oznacza zachowanie tylko pierwszych n słów i wycięcie pozostałych słów. W tej sekcji omówimy kilka sztuczek, które pomogą Ci osiągnąć tę pracę w programie Excel.

 Przytnij ciąg tekstowy do N słów za pomocą formuły

Aby przyciąć ciąg tekstowy do N słów, możesz utworzyć formułę opartą na funkcjach LEFT, ZNAJDŹ i SUBSTITUTE, ogólna składnia to:

• XNUMX: ciąg tekstowy lub odwołanie do komórki, które chcesz przyciąć;
• N: Liczba słów, które chcesz zachować z lewej strony danego ciągu tekstowego.

Aby poradzić sobie z tą pracą, skopiuj lub wprowadź poniższą formułę do pustej komórki:

A następnie przeciągnij uchwyt wypełniania w dół, aby zastosować tę formułę do innych komórek, zobacz zrzut ekranu:

---

 Przytnij ciąg tekstowy do N słów za pomocą funkcji zdefiniowanej przez użytkownika

Oprócz powyższej formuły możesz również utworzyć funkcję zdefiniowaną przez użytkownika do rozwiązania tego zadania, wykonaj następujące czynności:

1. Przytrzymaj Alt + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Kliknij wstawka > Modułi wklej następujący kod do okna modułu.

Kod VBA: Przytnij ciąg tekstowy do N słów

Function GetNWords(StrWords As String, Num_of_Words As Integer) As String
'Updateby Extendoffice
Dim xArr
Dim xRes As String
Dim xF As Integer
xStr = StrWords
If (Num_of_Words < 1) Then
    GetNWords = ""
    Exit Function
End If
xArr = Split(xStr, " ")
xRes = ""
On Error Resume Next
For xF = 0 To UBound(xArr)
    If Trim(xArr(xF)) <> "" Then
    Num_of_Words = Num_of_Words - 1
        If xRes = "" Then
            xRes = Trim(xArr(xF))
        Else
            xRes = xRes & " " & Trim(xArr(xF))
        End If
    End If
    If Num_of_Words = 0 Then Exit For
Next
If Num_of_Words = 0 Then
    GetNWords = xRes & "..."
Else
    GetNWords = xRes & "..."
End If
End Function

3. Następnie zamknij i zamknij okno kodu, wróć do arkusza roboczego i wprowadź tę formułę: = PobierzNsłów(A2,B2) do pustej komórki, a następnie przeciągnij uchwyt wypełniania w dół, aby zastosować tę formułę do innych komórek, tylko pierwsza określona liczba słów jest zachowywana, jak pokazano na poniższym zrzucie ekranu: