Jak usunąć tylko tekst z komórek zawierających liczby i teksty w programie Excel?

Jak pokazano na poniższym zrzucie ekranu, w przypadku komórek zmieszanych z liczbami i tekstami, jak usunąć wszystkie teksty i zachować tylko liczby w komórkach? Metody opisane w tym artykule mogą Ci pomóc.

Usuń tylko tekst z komórek zawierających liczby i teksty z funkcją zdefiniowaną przez użytkownika
Z łatwością usuwaj tylko tekst z komórek zawierających liczby i teksty za pomocą Kutools for Excel

Usuń tylko tekst z komórek zawierających liczby i teksty z funkcją zdefiniowaną przez użytkownika

Możesz również użyć poniższej funkcji zdefiniowanej przez użytkownika, aby usunąć teksty z określonych komórek i zachować tylko liczby.

1. wciśnij inny + F11 klawisze jednocześnie, aby otworzyć Microsoft Visual Basic for Applications okno.

2. w Microsoft Visual Basic for Applications okno, kliknij wstawka > Moduł. Następnie skopiuj i wklej poniższy kod VBA do pliku Kod okno. Zobacz zrzut ekranu:

Kod VBA: usuń tylko tekst z komórek zawierających liczby i teksty

Function OnlyNums(strWord As String)
    Dim strChar As String
    Dim x As Integer
    Dim strTemp As String

    strTemp = ""
    Application.ScreenUpdating = False
    For x = 1 To Len(strWord)
        strChar = Mid(strWord, x, 1)
        If Asc(strChar) >= 48 And _
          Asc(strChar) <= 57 Then
            strTemp = strTemp & strChar
        End If
    Next
    Application.ScreenUpdating = True
    OnlyNums = Val(strTemp)
End Function

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("A1:B10")) Is Nothing Then Cancel = True
End Sub

3. wciśnij inny + Q klucze do zamknięcia Microsoft Visual Basic for Applications okno.

4. Wybierz pustą komórkę, wprowadź formułę = Tylko liczby (A2) do paska formuły, a następnie naciśnij Wchodzę aby uzyskać wynik. Kontynuuj wybieranie komórki wynikowej, przeciągnij jej uchwyt wypełnienia w dół, aby uzyskać wszystkie wyniki. Zobacz zrzut ekranu:

Uwagi: We wzorze. A2 to komórka, w której usuniesz teksty i zachowasz tylko liczby. Zmień to, jak potrzebujesz.

Teraz możesz zobaczyć, że wszystkie teksty zostały usunięte, a tylko liczby są przechowywane w określonych komórkach.

Z łatwością usuwaj tylko tekst z komórek zawierających liczby i teksty za pomocą Kutools for Excel

Ta sekcja zaleci rozszerzenie Usuń znaki użyteczność Kutools dla programu Excel. Za pomocą tego narzędzia możesz usunąć wszystkie znaki nieliczbowe z komórek za pomocą zaledwie kilku kliknięć i zachować tylko liczby w komórkach. Wykonaj następujące czynności.

1. Wybierz komórki, z których chcesz usunąć teksty i zachowaj tylko liczby, a następnie kliknij Kutools > Tekst > Usuń znaki. 

2. w Usuń znaki w oknie dialogowym, zaznacz tylko Nieliczbowe a następnie kliknij OK przycisk.

Następnie wszystkie nieliczbowe znaki (teksty) są natychmiast usuwane z wybranych komórek, jak pokazano poniżej.

Powiązany artykuł:

• Jak usunąć liczby z komórek zawierających teksty i liczby w programie Excel?

---

Najlepsze narzędzia biurowe

Kutools dla programu Excel rozwiązuje większość problemów i zwiększa produktywność o 80%

• Ponowne użycie: Szybko włóż złożone wzory, wykresy i wszystko, czego używałeś wcześniej; Szyfruj komórki z hasłem; Utwórz listę mailingową i wysyłaj e-maile ...
• Pasek Super Formula (łatwo edytować wiele wierszy tekstu i formuły); Układ do czytania (łatwe odczytywanie i edytowanie dużej liczby komórek); Wklej do filtrowanego zakresu...
• Scal komórki / wiersze / kolumny bez utraty danych; Podziel zawartość komórek; Połącz zduplikowane wiersze / kolumny... Zapobiegaj zduplikowanym komórkom; Porównaj zakresy...
• Wybierz Duplikat lub Unikalny Wydziwianie; Wybierz puste wiersze (wszystkie komórki są puste); Super Find i Fuzzy Find w wielu zeszytach ćwiczeń; Losowy wybór ...
• Dokładna kopia Wiele komórek bez zmiany odwołania do formuły; Automatyczne tworzenie odniesień do wielu arkuszy; Wstaw punktory, Pola wyboru i nie tylko ...
• Wyodrębnij tekst, Dodaj tekst, Usuń według pozycji, Usuń przestrzeń; Tworzenie i drukowanie podsumowań stronicowania; Konwertuj zawartość komórek i komentarze...
• Super filtr (zapisz i zastosuj schematy filtrów do innych arkuszy); Zaawansowane sortowanie według miesiąca / tygodnia / dnia, częstotliwości i innych; Specjalny filtr pogrubieniem, kursywą ...
• Połącz skoroszyty i arkusze robocze; Scal tabele na podstawie kluczowych kolumn; Podziel dane na wiele arkuszy; Konwersja wsadowa xls, xlsx i PDF...
• Ponad 300 zaawansowanych funkcji. Obsługuje Office / Excel 2007-2021 i 365. Obsługuje wszystkie języki. Łatwe wdrażanie w przedsiębiorstwie lub organizacji. Pełne funkcje 30-dniowa bezpłatna wersja próbna. 60-dniowa gwarancja zwrotu pieniędzy.

Czytaj więcej... Darmowe pobieranie... Zakup... 

---

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!

Czytaj więcej... Darmowe pobieranie... Zakup...