Cum se elimină zero-urile din șirul de text alfanumeric din Excel?

Presupunând că am o listă de șiruri de text care includ câteva zerouri inițiale și acum vreau să elimin toate zerourile inițiale din șirurile de text pentru a obține următorul rezultat, cum aș putea rezolva această sarcină în Excel rapid și ușor?
Eliminați zero-urile din șiruri de text alfanumerice cu formula matrice
Eliminați zero-urile din șiruri de text alfanumerice cu funcția definită de utilizator
Eliminați zerourile inițiale din șirurile de text alfanumeric cu Kutools for Excel
Adăugați zerouri de început la șirurile de text cu Kutools for Excel
Eliminați zero-urile din șiruri de text alfanumerice cu formula matrice
În Excel, nu există nicio modalitate directă de a elimina zero-urile din șiruri, dar puteți aplica următoarea formulă matrice pentru a o rezolva.
1. Vă rugăm să tastați această formulă matrice: =MID(A2,MATCH(TRUE,(MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)<>"0"),0),LEN(A2)) (A2 este celula din care doriți să eliminați zerourile din partea de sus) într-o celulă goală de unde doriți să obțineți rezultatul, C2, de exemplu, și apoi apăsați Ctrl + Shift + Enter tastele împreună pentru a obține rezultatul corect, consultați captura de ecran:
2. Și apoi selectați celula C2 și trageți mânerul de umplere în jos până la celulele pe care doriți să le conțineți această formulă, toate zerourile principale au fost eliminate din șirurile de text, vedeți captura de ecran:
Eliminați zero-urile din șiruri de text alfanumerice cu funcția definită de utilizator
Cu excepția formulei de matrice de mai sus, următorul cod VBA vă poate face și o favoare, vă rugăm să faceți următoarele:
1. Țineți apăsat butonul ALT + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. Clic Insera > Moduleși lipiți următorul cod în Fereastra modulului.
Cod VBA: eliminați zero-urile din șirurile de text alfanumerice:
Function RemoveLeadingZeros(Str As String)
'updateby Extendoffice
Do While Left(Str, 1) = "0"
Str = Mid(Str, 2)
Loop
RemoveLeadingZeros = Str
End Function
3. Și apoi salvați și închideți acest cod, reveniți la foaia de lucru și introduceți această formulă: = removeleadingzeros (A2) (A2 este celula din care doriți să eliminați zerourile de la) într-o celulă goală, apoi glisați mânerul de umplere în jos în celulele pe care doriți să le aplicați această formulă și toate zerourile de la început au fost șterse din șirurile de text, consultați captura de ecran :
Eliminați zerourile inițiale din șirurile de text alfanumeric cu Kutools for Excel
Dacă aveţi Kutools for Excel, Cu său Eliminați zero-urile principale caracteristică, puteți elimina toate zerourile din mai multe celule printr-un clic.
Kutools for Excel : cu mai mult de 300 de programe de completare Excel la îndemână, gratuit pentru a încerca fără limitări în 30 de zile. |
După instalare Kutools for Excel, vă rugăm să faceți următoarele:
1. Selectați celulele pe care doriți să le eliminați toate zerourile principale, apoi faceți clic pe Kutools > Text > Eliminați zero-urile principale, vezi captura de ecran:
2. Și apoi toate zero-urile din șirurile de text au fost șterse simultan, vezi captura de ecran:
Descărcare și încercare gratuită Kutools for Excel Acum!
Adăugați zerouri de început la șirurile de text cu Kutools for Excel
Uneori, poate doriți să inserați simultan un număr de zerouri înainte de șirurile de text, în acest caz, Kutools for Excel'S Adăuga text utilitarul vă poate ajuta să terminați acest job cât de repede puteți.
După instalare Kutools for Excel, vă rugăm să faceți următoarele:
1. Selectați celulele șirului de text pe care doriți să le adăugați la zero.
2. Apoi apasa Kutools > Text > Adăuga text, vezi captura de ecran:
3. În Adăuga text caseta de dialog, introduceți zerouri pe care doriți să le adăugați înainte de șirurile de text în Text , apoi selectați Înainte de primul personaj de la Poziţie, vezi captura de ecran:
4. Apoi apasa Ok or Aplică buton, numărul specificat de zerouri a fost inserat înainte de toate șirurile de text selectate, consultați captura de ecran:
Descărcare și încercare gratuită Kutools for Excel Acum!
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools for Excelși experimentați eficiența ca niciodată înainte. Kutools for 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...
Office Tab Aduce interfața cu file la 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!
