Hoe verwijder ik alleen tekst uit cellen met cijfers en teksten in Excel?
Zoals onderstaand screenshot laat zien, hoe kan ik voor die cellen gemengd met cijfers en teksten alle teksten verwijderen en alleen cijfers in cellen behouden? De methoden in dit artikel kunnen u helpen.
Verwijder alleen tekst uit cellen die cijfers en teksten bevatten met de door de gebruiker gedefinieerde functie
Verwijder eenvoudig alleen tekst uit cellen die cijfers en teksten bevatten met Kutools voor Excel
Verwijder alleen tekst uit cellen die cijfers en teksten bevatten met de door de gebruiker gedefinieerde functie
U kunt ook de onderstaande door de gebruiker gedefinieerde functie gebruiken om teksten uit gespecificeerde cellen te verwijderen en alleen nummers te behouden.
1. druk de anders + F11 toetsen tegelijkertijd om het Microsoft Visual Basic voor toepassingen venster.
2. In de Microsoft Visual Basic voor toepassingen venster klikt Invoegen > Module. Kopieer en plak vervolgens de onderstaande VBA-code in het Code venster. Zie screenshot:
VBA-code: verwijder alleen tekst uit cellen die cijfers en teksten bevatten
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. druk de anders + Q toetsen om de Microsoft Visual Basic voor toepassingen venster.
4. Selecteer een lege cel, voer de formule in = OnlyNums (A2) in de formulebalk en druk vervolgens op Enter sleutel om het resultaat te krijgen. Blijf de resultaatcel selecteren, sleep de vulhendel naar beneden om alle resultaten te krijgen. Zie screenshot:
Opmerking:: In de formule. A2 is de cel waarin u teksten verwijdert en alleen cijfers behoudt. Wijzig het indien nodig.
Nu kunt u zien dat alle teksten zijn verwijderd en dat alleen nummers in de opgegeven cellen worden bewaard.
Verwijder eenvoudig alleen tekst uit cellen die cijfers en teksten bevatten met Kutools voor Excel
In deze sectie wordt het Tekens verwijderen nut van Kutools for Excel. Met dit hulpprogramma kunt u alle niet-numerieke tekens uit cellen verwijderen met slechts enkele klikken, en alleen cijfers in cellen behouden. Ga als volgt te werk.
Voor het aanvragen Kutools for Excel, Dan kunt u download en installeer het eerst.
1. Selecteer de cellen die u nodig heeft om teksten te verwijderen en alleen cijfers te behouden, en klik op Kutools > Tekst > Tekens verwijderen.
2. In de Tekens verwijderen dialoogvenster, vink alleen het Niet numeriek vak en klik vervolgens op het OK knop.
Vervolgens worden alle niet-numerieke tekens (teksten) onmiddellijk uit de geselecteerde cellen verwijderd, zoals hieronder wordt getoond.
Als u een gratis proefperiode wilt hebben (30-dag) van dit hulpprogramma, klik om het te downloaden, en ga vervolgens de bewerking toepassen volgens de bovenstaande stappen.
Gerelateerd artikel:
De beste tools voor kantoorproductiviteit
Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%
- visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
- Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
- Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
- Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
- Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
- Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
- Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
- Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
- Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2021 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Volledige functies Gratis proefperiode van 30 dagen. 60 dagen geld-terug-garantie.
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
