Cum se extrag numere din șiruri de text alfanumerice mixte în Excel?

Acest tutorial oferă trei metode pentru a ajuta la extragerea numerelor dintr-un șir de text alfanumeric mixt în Excel.

Extrageți numerele din șiruri de text alfanumerice mixte cu formulă
Extrageți cu ușurință numerele din șiruri de text alfanumerice mixte cu un instrument uimitor
Extrageți numerele din șiruri de text alfanumerice mixte cu cod VBA

Extrageți numerele din șiruri de text alfanumerice mixte cu formulă

Puteți aplica formula de mai jos pentru a extrage numerele de oriunde dintr-un șir de text în Excel.

1. Selectați o celulă goală pentru a afișa numerele extrase, introduceți formula de mai jos în ea și apăsați tasta Intrați cheie. Apoi trageți mânerul de completare automată în jos pentru a aplica formula altor celule.

=IF(SUM(LEN(A2)-LEN(SUBSTITUTE(A2, {"0","1","2","3","4","5","6","7","8","9"}, "")))>0, SUMPRODUCT(MID(0&A2, LARGE(INDEX(ISNUMBER(--MID(A2,ROW(INDIRECT("$1:$"&LEN(A2))),1))* ROW(INDIRECT("$1:$"&LEN(A2))),0), ROW(INDIRECT("$1:$"&LEN(A2))))+1,1) * 10^ROW(INDIRECT("$1:$"&LEN(A2)))/10),"")

notițe: În formulă, A1 este celula care conține șirul de text pe care doriți să extrageți numerele. Vă rugăm să îl modificați în funcție de nevoile dvs.

Apoi, numerele sunt extrase de oriunde dintr-un șir de text în celulele specificate, așa cum se arată în captura de ecran de mai sus.

Extrageți cu ușurință numere din șiruri de text alfanumerice mixte cu Kutools for Excel

Această secțiune recomandă utilitarul Extragere text al Kutools for Excel. Cu acest utilitar, extragerea numerelor dintr-un șir de text poate fi ușor de gestionat.

1. clic Kutools > Text > Extrageți textul pentru a activa caracteristica.

2. În Extrageți textul caseta de dialog, vă rugăm să efectuați setările de mai jos.

2.1) Faceți clic pe Extrageți după locație fila (Această filă este activată implicit);

2.2) În Gamă secțiune, faceți clic pe buton pentru a selecta gama de celule din care veți extrage text;

2.3) În Opţiuni secțiune: Selectați Extrageți numărul opțiune;

2.4) Faceți clic pe OK.

Notă: Verifică Inserați ca formulă caseta din colțul din stânga jos al dialogului va insera rezultatul ca formulă în celulele rezultate. Când se modifică valoarea celulei la care se face referire, rezultatul se va actualiza automat.

3. În Extrageți textul caseta de dialog, selectați o celulă necompletată pentru a afișa textul extras, apoi faceți clic pe OK.

Apoi se extrag numerele din orice poziție dintr-un șir de text. Vedeți captura de ecran:

Păstrați numerele numai în șiruri de text alfanumerice mixte cu cod VBA

Următorul cod VBA vă poate ajuta să eliminați toate caracterele nenumerice din intervalul specificat și să păstrați numai numere în celule. Vă rugăm să faceți următoarele.

notițe: Deoarece codul execută direct intervalul original, păstrați o copie a intervalului original în cazul pierderii datelor.

1. presa Alt + F11 tastele simultan pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > Module. Apoi copiați și lipiți codul VBA de mai jos în fereastra Module.

Cod VBA: eliminați toate caracterele nenumerice din celule

Sub GetNumbers()
'Updated by Extendoffice 20210125
    Dim xRegEx As Object
    Dim xRg As Range
    Dim xCell As Range
    Dim xTxt As String
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Pease select range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Set xRegEx = CreateObject("VBScript.RegExp")
    With xRegEx
        .Pattern = "\D+"
        .IgnoreCase = True
        .Global = True
    End With
    xRg.NumberFormat = "@"
    For Each xCell In xRg
        xCell.Value = xRegEx.Replace(xCell.Value, "")
    Next
    Set xRegEx = Nothing
End Sub

3. apasă pe F5 tasta pentru a rula codul. Apoi o Kutools for Excel apare fereastra de dialog, selectați intervalul care conține șiruri de text alfanumerice mixte, veți păstra doar numerele și faceți clic pe OK butonul.

Acum, toate caracterele nenumerice din intervalul selectat au fost eliminate imediat și numai numerele păstrate. Vedeți captura de ecran: