Cum se extrage text numai din șir alfanumeric în Excel?
Când aveți o listă lungă de mai multe șiruri alfanumerice în fiecare celulă din Excel și doriți doar să extrageți numai șiruri de text din ele, puteți face următoarele moduri pe care le introduc.
Extrageți text numai din șir alfanumeric utilizând funcția definită în Excel
Extrageți text numai din șir alfanumeric cu Kutools pentru Excel
Extrageți text numai din șir alfanumeric utilizând funcția definită în Excel
Utilizați funcția definită pentru a extrage text numai din șir alfanumeric în Excel, procedând după cum urmează:
1. Selectați o celulă a coloanei pe care doriți să o selectați și apăsați Alt + F11 pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. În fereastra pop-up, faceți clic pe Insera > Module, apoi lipiți următorul cod VBA în modul.
VBA: extrageți numai text
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. Salvați codul și închideți fereastra, apoi tastați această formulă = TextOnly (A1) (A1 este prima celulă de rând din lista dvs. din care doriți să extrageți numai text) într-o celulă goală, apăsați Intrați , apoi umpleți mânerul până la intervalul dorit.
Extrageți text numai din șir alfanumeric cu Kutools pentru Excel
Kutools pentru Excel's Eliminați caractere funcția vă poate ajuta, de asemenea, să extrageți text numai în Excel.
Kutools pentru Excel include mai mult de 300 de instrumente Excel la îndemână. Încercare gratuită fără limitări în 30 de zile. Ia-l acum
1. Selectați intervalul pe care doriți să extrageți numai text și faceți clic pe Kutools > Instrumente de text > Eliminați caractere. Vedeți captura de ecran:
2. În Eliminați caractere dialog, verificați Numeric și Neimprimare casete de selectare. Vedeți captura de ecran:
3. clic Ok, apoi toate caracterele non-text sunt eliminate, vezi captura de ecran:
varful: Deoarece această aplicație vă va schimba datele originale, ar fi bine să copiați mai întâi datele originale într-un alt loc.
Pentru mai multe informații despre Eliminarea caracterelor.
Articole relative:
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!