Բաց թողնել հիմնական բովանդակությունը
 

Ինչպե՞ս հեռացնել ոչ թվային նիշերը Excel-ի բջիջներից:

Հեղինակ՝ Mandyzhou Վերջին փոփոխությունը՝ 2024-06-18

Excel-ի օգտատերերը հաճախ հանդիպում են տվյալների, որոնք ներառում են թվերի և ոչ թվային նիշերի խառնուրդ, ինչպիսիք են տառերը կամ նշանները: Այս տվյալների մաքրումը կարող է էական լինել հետագա վերլուծության կամ հաշվետվությունների համար: Այս ուղեցույցում մենք կուսումնասիրենք Excel-ի բջիջներից ոչ թվային նիշերը հեռացնելու չորս եղանակ՝ համոզվելով, որ ձեր տվյալները մաքուր են և օգտագործելի:


Հեռացրեք ոչ թվային նիշերը Excel-ի բջիջներից

Այս բաժնում մենք կներկայացնենք Excel-ի բջիջներից ոչ թվային նիշերը հեռացնելու չորս արդյունավետ մեթոդներ՝ հարմարեցված Excel-ի տարբեր տարբերակների և օգտատերերի փորձագիտական ​​մակարդակների համար:


Հեռացրեք ոչ թվային նիշերը Excel-ի բջիջներից՝ օգտագործելով բանաձև

Excel-ի բջիջներից ոչ թվային նիշերը հեռացնելու համար կարող եք օգտագործել բանաձև, որը հիմնված է ՄԻԱԵԼ գործառույթը:

Քայլ 1. Ընտրեք բջիջ և կիրառեք բանաձևը

Խցում C2, կիրառեք ստորև բերված բանաձևը և սեղմեք կոճակը Մտնել արդյունքը ստանալու բանալին:

=TEXTJOIN("",TRUE,IFERROR(MID(A2,SEQUENCE(LEN(A2)),1)+0,""))+0
The ՄԻԱԵԼ գործառույթը հասանելի է Excel 2019-ում և ավելի ուշ: Եւ ՀԵՏԵՎՅԱՆՈՒԹՅՈՒՆ գործառույթը հասանելի է Excel 2021-ում և ավելի ուշ: Եթե ​​ցանկանում եք նպատակին հասնելու ավելի հեշտ ճանապարհ Excel-ի բոլոր տարբերակներում, դիմեք Օգտագործելով Kutools AI Aide-ը մեթոդը կամ Օգտագործելով զարմանալի գործիք մեթոդ, որը մենք կներկայացնենք հաջորդիվ:
Քայլ 2. Կիրառեք բանաձևը այլ բջիջների վրա և ստացեք բոլոր արդյունքները

Սկզբնական արդյունքը հաշվարկելուց հետո քաշեք լրացման բռնակը բանաձևի բջիջից (C2 այս օրինակում) ներքև՝ բանաձևը այլ բջիջների վրա կիրառելու համար՝ ընդլայնելով այն դեպի բջիջ C8.

Բանաձևի բացատրություն.
  1. LEN (A2)Գտնում է A2 տողի երկարությունը:
  2. SEQUENCE (LEN(A2))Ստեղծում է 1-ից մինչև տողի երկարությունը թվերի ցուցակ: Յուրաքանչյուր թիվ համապատասխանում է տողի նիշերի դիրքին:
  3. MID(A2, SEQUENCE(LEN(A2)), 1): Քաղում է յուրաքանչյուր նիշ A2-ից մեկ առ մեկ:
  4. +0Փորձում է յուրաքանչյուր նիշը վերածել թվի: Եթե ​​նիշը թիվ չէ, այն սխալ է առաջացնում:
  5. ԻՖԵՐՈՐ (..., «»)Եթե ​​նիշի փոխարկումը սխալ է առաջացնում (նշանակում է, որ այն թիվ չէ), այն փոխարինվում է դատարկ տողով:
  6. TEXTJOIN ("", TRUE, ...)Համատեղում է բոլոր նիշերը մեկ տողի մեջ՝ բաց թողնելով դատարկ տողերը (ոչ թվերը, որոնք հեռացվել են):
  7. +0 վերջում.վերափոխում է թվերի վերջնական տողը թվային արժեքի:

Հեռացրեք ոչ թվային նիշերը Excel-ում բջիջներից՝ օգտագործելով Kutools AI Aide-ը

Excel- ի համար նախատեսված գործիքներ's AI օգնական առանձնահատկությունն առաջարկում է անզուգական հարմարավետություն Excel թերթերը մաքրելու հարցում՝ առանց ջանքերի հեռացնելով ոչ թվային նիշերը: Պարզապես ձեր կողմից ստացված պարզ ներդրման շնորհիվ այս հզոր գործիքը ստանձնում է վերահսկողությունը՝ ավտոմատ կերպով վերլուծելով և կատարելով պահանջվող առաջադրանքները՝ առանց բարդ բանաձևերի անհրաժեշտության: Սա ոչ միայն արագացնում է գործընթացը, այլև վերացնում է սխալների հավանականությունը՝ զգալիորեն բարձրացնելով ձեր արտադրողականությունն ու ճշգրտությունը: Այն AI օգնական Այն, ինչ կարող է լինել ձանձրալի ձեռքով առաջադրանքը, վերածում է անխափան, արդյունավետ աշխատանքի՝ դարձնելով այն կարևոր առավելություն Excel-ի ցանկացած օգտագործողի համար, որը նպատակ ունի օպտիմալացնել իրենց աշխատանքային հոսքերը:

Այն բանից հետո Excel-ի համար Kutools-ի ներբեռնում և տեղադրումՀամար Kutools AI > AI օգնական բացելու համար Kutools AI օգնական հաց.

1. Մեջ Kutools AI Aid պատուհանում, մուտքագրեք ձեր հարցումը, ինչպես ստորև նշված տեքստը, զրույցի վանդակում և սեղմեք ուղարկել կոճակը կամ սեղմել Մտնել ձեր հարցումը ներկայացնելու բանալին:

"Խնդրում եմ հեռացնել ոչ թվային նիշերը A2:A8 միջակայքից Excel-ում ինձ համար."

2. Երբ գործիքը վերլուծի ձեր մուտքագրումը, սեղմեք կոճակը Կատարել կոճակը։ Kutools AI Aide-ը կկիրառի իր AI տեխնոլոգիան՝ ձեր հարցումը մշակելու և արդյունքները անմիջապես Excel-ում կիրառելու համար:

ԱկնարկԱյս հնարավորությունն օգտագործելու համար պետք է տեղադրել Excel- ի համար նախատեսված գործիքներ նախ, խնդրում եմ սեղմեք ներբեռնելու և 30-օրյա անվճար փորձարկում ունենալու համար Թեմա.


Հեռացրեք ոչ թվային նիշերը Excel-ի բջիջներից՝ օգտագործելով զարմանալի գործիք

Տվյալների արդյունավետ մաքրման համար՝ հեռացնելով ոչ թվային նիշերը նշված տիրույթում, Excel- ի համար նախատեսված գործիքներ'S Հեռացնել նիշերը կոմունալ ապահովում է ա մեկ կտտոցով լուծում. Այս հզոր գործիքը հեշտացնում է այն, ինչը հաճախ կարող է բարդ գործընթաց լինել՝ թույլ տալով արագ վերացնել անցանկալի նիշերը ձեր տվյալներից՝ ապահովելով ավելի մաքուր և օգտագործելի արդյունքներ անմիջապես:

Նշում: Սա կիրառելու համար Հեռացնել նիշերը հնարավորությունը, նախ, դուք պետք է ներբեռնեք և տեղադրեք Excel- ի համար նախատեսված գործիքներ.

1. Այն միջակայքն ընտրելուց հետո, որտեղից ցանկանում եք հեռացնել ոչ թվային նիշերը, սեղմեք Կուտոլս > Տեքստ > Հեռացնել նիշերը.

2. Մեջ Հեռացնել նիշերը երկխոսության տուփ, ստուգեք Ոչ թվային տարբերակը և սեղմեք OK. Այնուհետև ոչ թվային նիշերն անմիջապես հանվում են ընտրվածից:

ԱկնարկԱյս հնարավորությունն օգտագործելու համար պետք է տեղադրել Excel- ի համար նախատեսված գործիքներ նախ, խնդրում եմ սեղմեք ներբեռնելու և 30-օրյա անվճար փորձարկում ունենալու համար Թեմա.


Հեռացրեք ոչ թվային նիշերը Excel-ի բջիջներից՝ օգտագործելով VBA կոդը


VBA կոդով տիրույթից ոչ թվային նիշերը հեռացնելու համար կատարեք հետևյալը.

Քայլ 1. Բացեք VBA մոդուլի խմբագրիչը և պատճենեք կոդը
  1. Անջատեք ALT + F11 Excel- ի ստեղները, և այն բացում է Microsoft Visual Basic հավելվածների համար պատուհան.
  2. Սեղմել Տեղադրել > Մոդուլներ, ապա պատճենեք և տեղադրեք հետևյալ կոդը Մոդուլներ Պատուհանը:
  3. VBA կոդը. Հեռացրեք բոլոր ոչ թվային նիշերը
    Sub RemoveNotNum()
    'Updateby Extendoffice
    Dim Rng As Range
    Dim WorkRng As Range
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
    For Each Rng In WorkRng
        xOut = ""
        For i = 1 To Len(Rng.Value)
            xTemp = Mid(Rng.Value, i, 1)
            If xTemp Like "[0-9]" Then
                xStr = xTemp
            Else
                xStr = ""
            End If
            xOut = xOut & xStr
        Next i
        Rng.Value = xOut
    Next
    End Sub
    
Քայլ 2. Կատարեք կոդը
  1. Այս կոդը փակցնելուց հետո սեղմեք F5 ստեղն ՝ այս կոդը գործելու համար:
  2. Պատուհանման մեջ KutoolsforExcel երկխոսության վանդակում, ընտրեք մի տիրույթ, որից ցանկանում եք հեռացնել ոչ թվային նիշերը, ապա սեղմեք OK.
Արդյունք

Այնուհետև ընտրված տիրույթում բոլոր ոչ թվային նիշերը հանվում են:

Եթե ​​ձեր տվյալները ներառում են տասնորդական կետերով թվեր, կարող եք օգտագործել հետևյալ VBA սկրիպտը.
  1. Sub RemoveNotNum()
    'Updateby Extendoffice
    Dim Rng As Range
    Dim WorkRng As Range
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
    For Each Rng In WorkRng
        xOut = ""
        For i = 1 To Len(Rng.Value)
            xTemp = Mid(Rng.Value, i, 1)
            If xTemp Like "[0-9.]" Then
                xStr = xTemp
            Else
                xStr = ""
            End If
            xOut = xOut & xStr
        Next i
        Rng.Value = xOut
    Next
    End Sub
    
  2. Արդյունք