Note: The other languages of the website are Google-translated. Back to English

Excel-ը տեքստային տողերից հեռացնում է նիշերը, բառերը, թվերը

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

Բովանդակություն:

1. Հեռացրեք նիշերը տեքստային տողերի ձախից, աջից կամ միջինից

2. Հեռացրեք անցանկալի / հատուկ նիշերը տեքստային տողերից

3. Հեռացրեք նիշերը / տեքստը կոնկրետ նիշից առաջ կամ հետո

4. Հեռացրեք բառերը տեքստային տողերից


Հեռացրեք նիշերը տեքստային տողերի ձախից, աջից կամ միջինից

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

1.1 Հեռացրեք առաջին n նիշերը տեքստային տողերից

Եթե ​​Ձեզ անհրաժեշտ է հեռացնել առաջին n նիշերը տեքստային տողերի ցանկից, ապա հետևյալ մեթոդները կարող են ձեզ լավություն անել:

 Օգտագործելով բանաձևեր

Սովորաբար, տեքստային տողերի սկզբից նիշերը ջնջելու համար կարող եք օգտագործել կամ REPLACE ֆունկցիան կամ RIGHT և LEN ֆունկցիաների համակցությունը:

REPLACE ֆունկցիան առաջին N նիշերը հեռացնելու համար.

=REPLACE(string, 1, num_chars, "")
  • լարայինՏեքստի տողը, որից ցանկանում եք հեռացնել նիշերը.
  • num_charsՆիշերի քանակը, որը ցանկանում եք հեռացնել:

Օրինակ՝ բջիջներից առաջին 2 նիշերը հեռացնելու համար օգտագործեք ստորև բերված բանաձևը, այնուհետև քաշեք լրացման բռնիչը՝ բանաձեւը այլ բջիջներ պատճենելու համար, տես սքրինշոթը.

=REPLACE(A4, 1, 2, "")

RIGHT և LEN ֆունկցիաները առաջին N նիշերը հեռացնելու համար.

=RIGHT(string, LEN(string) - num_chars)
  • լարայինՏեքստի տողը, որից ցանկանում եք հեռացնել նիշերը.
  • num_charsՆիշերի քանակը, որը ցանկանում եք հեռացնել:

Բջիջներից առաջին 2 նիշերը հեռացնելու համար խնդրում ենք կիրառել հետևյալ բանաձևը.

=RIGHT(A4,LEN(A4)-2)


 Օգտվողի կողմից սահմանված գործառույթն օգտագործելով

Բջիջներից առաջին n նիշերը հեռացնելու համար կարող եք նաև ստեղծել Օգտատիրոջ կողմից սահմանված գործառույթ՝ այս խնդիրը լուծելու համար: Խնդրում ենք կատարել հետևյալ քայլերը.

1, Պահեք պահեք Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներև տեղադրեք հետևյալ կոդը Մոդուլի պատուհանում:

VBA կոդը. Հեռացրեք առաջին n նիշը տեքստային տողերից

Function removeFirstx(rng As String, cnt As Long)
'Updateby Extendoffice
removeFirstx = Right(rng, Len(rng) - cnt)
End Function

3, Դրանից հետո վերադառնաք աշխատանքային թերթիկ և մուտքագրեք այս բանաձևը. = removefirstx (A4,2) դատարկ բջիջի մեջ և ապա քաշեք լրացման բռնիչը ներքև ՝ արդյունքն ստանալու համար, որքան ձեզ հարկավոր է, տեսեք,

Նշում: Այս բանաձևում. A4 այն բջիջն է, որտեղից ցանկանում եք հեռացնել նիշերը. Համարը 2 նշում է այն նիշերի քանակը, որոնք ցանկանում եք հեռացնել տեքստի տողի սկզբից:


1.2 Հեռացրեք վերջին n նիշը տեքստային տողերից

Տեքստային տողերի աջ մասից որոշակի քանակությամբ նիշեր հեռացնելու համար կարող եք նաև օգտագործել բանաձև կամ օգտագործողի կողմից սահմանված գործառույթ:

 Օգտագործելով բանաձև

Վերջին n նիշերը տեքստային տողերից հեռացնելու համար կարող եք օգտագործել LEFT և LEN ֆունկցիաների վրա հիմնված բանաձև:

LEFT և LEN գործառույթները վերջին N նիշերը հեռացնելու համար.

=LEFT(string, LEN(string) - num_chars)
  • լարայինՏեքստի տողը, որից ցանկանում եք հեռացնել նիշերը.
  • num_charsՆիշերի քանակը, որը ցանկանում եք հեռացնել:

Տեքստային տողերի վերջից 3 նիշ ջնջելու համար օգտագործեք այս բանաձևը, այնուհետև քաշեք լրացման բռնիչը՝ բանաձեւը այլ բջիջներ պատճենելու համար, տես սքրինշոթը.

=LEFT(A4, LEN(A4) - 3)


 Օգտվողի կողմից սահմանված գործառույթն օգտագործելով

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

1, Պահեք պահեք Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներև տեղադրեք հետևյալ կոդը Մոդուլի պատուհանում:

VBA կոդը. Հեռացրեք վերջին n նիշը տեքստային տողերից

Function removeLastx(rng As String, cnt As Long)
'Updateby Extendoffice
removeLastx = Left(rng, Len(rng) - cnt)
End Function

3. Այնուհետև վերադարձեք աշխատաթերթ և մուտքագրեք այս բանաձևը. = removelastx (A4,3) դատարկ բջիջի մեջ և ապա քաշեք լրացման բռնիչը ներքև ՝ արդյունքն ստանալու համար, որքան ձեզ հարկավոր է, տեսեք,

Նշում: Այս բանաձևում. A4 այն բջիջն է, որտեղից ցանկանում եք հեռացնել նիշերը. Համարը 3 նշում է նիշերի քանակը, որոնք կցանկանայիք հեռացնել տեքստի տողի վերջից:


1.3 Հեռացրեք առաջին, վերջին n նիշերը կամ որոշակի դիրքի նիշերը՝ օգտագործելով հզոր հատկանիշ

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

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներԽնդրում եմ արեք հետևյալ կերպ

1. Ընտրեք այն բջիջները, որոնք ցանկանում եք հեռացնել նիշերը, ապա սեղմեք Կուտոլս > Տեքստ > Հեռացնել ըստ դիրքի, տես նկարի նկարը.

2, Մեջ Հեռացնել ըստ դիրքի երկխոսության տուփ, խնդրում ենք կատարել հետևյալ գործողությունները.

2.1 Հեռացրեք առաջին n նիշերը բջիջներից.

  • In Համարներ textbox, մուտքագրեք նիշերի քանակը, որոնք ցանկանում եք հեռացնել տողերից: Այս օրինակում ես կհեռացնեմ առաջին 2 նիշերը:
  • ընտրել Ձախից ընտրություն Դիրք բաժնում:
  • Այնուհետեւ կտտացրեք Ok or Դիմել կոճակը՝ արդյունքը ստանալու համար, ինչպես ցույց է տրված ստորև նշված սքրինշոթը:

2.2 Հեռացրեք վերջին n նիշերը բջիջներից.

  • In Համարներ textbox, մուտքագրեք նիշերի քանակը, որոնք ցանկանում եք հեռացնել տողերից: Այս օրինակում ես կհեռացնեմ վերջին 3 նիշերը:
  • ընտրել Աջից ընտրություն Դիրք բաժնում:
  • Այնուհետեւ կտտացրեք Ok or Դիմել կոճակը՝ արդյունքը ստանալու համար, ինչպես ցույց է տրված ստորև նշված սքրինշոթը:

2.3 Հեռացրեք n նիշ բջիջների հատուկ դիրքից.

Եթե ​​Ձեզ անհրաժեշտ է տեքստային տողերի որոշակի դիրքից հեռացնել որոշակի թվով նիշ, օրինակ, 3 նիշ հեռացնելը սկսվում է տողերի երրորդ նիշից:

  • In Համարներ textbox, մուտքագրեք նիշերի քանակը, որոնք ցանկանում եք հեռացնել տողերից: Այս օրինակում ես կհեռացնեմ 3 նիշ որոշակի դիրքից։
  • ընտրել Մատնանշել ընտրանքը և մուտքագրեք այն թիվը, որից ցանկանում եք հեռացնել նիշերը, որոնցից սկսվում են տեքստային վանդակում Դիրք Բաժին. Այստեղ ես կհեռացնեմ նիշերը երրորդ նիշից:
  • Այնուհետեւ կտտացրեք Ok or Դիմել կոճակը՝ արդյունքը ստանալու համար, ինչպես ցույց է տրված ստորև նշված սքրինշոթը:

Ներբեռնեք և անվճար փորձեք Kutools- ը Excel- ի համար:


1.4 Բանաձևով տեքստային տողերից հեռացնել և՛ առաջին, և՛ վերջին n նիշերը

Երբ Ձեզ անհրաժեշտ է հեռացնել որոշ նիշեր տեքստային տողերի երկու կողմերում Excel-ում, կարող եք համատեղել MID և LEN ֆունկցիաները՝ այս առաջադրանքը լուծելու համար բանաձև ստեղծելու համար:

=MID(string, left_chars + 1, LEN(string) - (left_chars + right_chars)
  • լարայինՏեքստի տողը, որից ցանկանում եք հեռացնել նիշերը.
  • left_charsՁախից հեռացնելու նիշերի քանակը;
  • right_charsաջից հեռացնելու համար նախատեսված նիշերի քանակը:

Օրինակ, դուք պետք է միաժամանակ հեռացնեք տեքստային տողերից առաջին 7 և վերջին 5 նիշերը, խնդրում ենք մուտքագրել հետևյալ բանաձևը դատարկ բջիջի մեջ.

=MID(A4, 7+1, LEN(A4) - (7+5))

Նշում: Այս բանաձևում. A4 այն բջիջն է, որտեղից ցանկանում եք հեռացնել նիշերը. Համարը 7 այն նիշերի քանակն է, որը ցանկանում եք հեռացնել ձախից. Համարը 5 այն նիշերի քանակն է, որը ցանկանում եք հեռացնել աջ կողմից:

Եվ այնուհետև քաշեք լրացման բռնակը ներքև այնտեղ, որտեղ ցանկանում եք կիրառել այս բանաձևը, և ​​դուք կստանաք արդյունքը, ինչպես ցույց է տրված ստորև նշված սքրինշոթը.


Հեռացրեք անցանկալի / հատուկ նիշերը տեքստային տողերից

Երբ որևէ այլ տեղից տվյալներ ներմուծեք Excel, շատ հատուկ կամ անցանկալի նիշեր կարող են տեղադրվել ձեր աշխատաթերթում: Այս անցանկալի նիշերը հեռացնելու համար, ինչպիսիք են #@$%^&, բացատները, թվերը, ոչ թվային թվերը, տողերի ընդմիջումները և այլն, այս բաժինը ձեզ կօգնի մի քանի օգտակար մեթոդներ:

2.1 Հեռացրեք որոշ հատուկ նիշեր տեքստային տողերից

Եթե ​​տեքստային տողերում կան որոշ հատուկ նիշեր, ինչպիսիք են %^&*(), ապա այս տեսակի նիշերը հեռացնելու համար կարող եք կիրառել ստորև նշված երեք հնարքները:

 Հեռացրեք մի քանի հատուկ նիշ տեքստային տողերից SUBSTITUTE ֆունկցիայով

Սովորաբար, Excel-ում դուք կարող եք տեղադրել մի քանի SUBSTITUTE ֆունկցիաներ՝ յուրաքանչյուր կոնկրետ նիշ ոչնչով փոխարինելու համար, ընդհանուր շարահյուսությունը հետևյալն է.

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(string_cell, char1, ""), char2, ""), char3, "")
  • string_cellԲջիջը պարունակում է տեքստային տող, որից ցանկանում եք հեռացնել հատուկ նիշերը.
  • char1, char2, char3Անցանկալի նիշերը, որոնք ցանկանում եք հեռացնել:

Այժմ խնդրում ենք պատճենել կամ մուտքագրել ստորև բերված բանաձևը դատարկ բջիջի մեջ.

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A2, "#", ""), "&", ""), "*", ""), "%", "")

Եվ այնուհետև քաշեք լրացման բռնակը դեպի այն բջիջները, որտեղ ցանկանում եք կիրառել այս բանաձևը, և ​​ձեր նշած բոլոր անցանկալի նիշերը միանգամից կհեռացվեն, տես սքրինշոթը.

TipsԵթե ​​կան ավելի շատ նիշեր, որոնք ցանկանում եք հեռացնել, դուք պարզապես պետք է ավելի շատ SUBSTITUTE ֆունկցիաներ տեղադրեք բանաձևի ներսում:


 Հեռացրեք մի քանի հատուկ նիշ տեքստային տողերից Օգտատիրոջ կողմից սահմանված գործառույթով

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

1, Պահեք պահեք Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներև տեղադրեք հետևյալ կոդը մոդուլի պատուհանում:

VBA կոդ. Հեռացրեք մի քանի հատուկ նիշ տեքստային տողերից

Function RemoveUnwantedChars(Str As String, xchars As String)
'Updateby Extendoffice
    For Index = 1 To Len(xchars)
        Str = Replace(Str, Mid(xchars, Index, 1), "")
    Next
    RemoveUnwantedChars = Str
End Function

3. Այնուհետև փակեք ծածկագրի պատուհանը և վերադարձեք աշխատաթերթ, մուտքագրեք այս բանաձևը =RemoveUnwanted Chars (A2, $D$2) դատարկ բջիջի մեջ, որտեղ պետք է ելքագրվի արդյունքը, այնուհետև քաշեք լրացման բռնակը ներքև՝ արդյունքները ստանալու համար, ինչպես պետք է, տես սքրինշոթը.

ՆշումՎերոհիշյալ բանաձևում. A2 այն բջիջն է, որտեղից ցանկանում եք հեռացնել նիշերը. $ 2 $ XNUMX $ պարունակում է հատուկ նիշեր, որոնք ցանկանում եք հեռացնել (կարող եք մուտքագրել ձեզ անհրաժեշտ ցանկացած այլ հատուկ նիշ):


 Հեռացրեք մի քանի հատուկ նիշ տեքստային տողերից զարմանալի հատկանիշով

Եթե ​​տեղադրեք Excel- ի համար նախատեսված գործիքներԻր Հեռացնել նիշերը Դուք կարող եք հեռացնել բոլոր տեսակի նիշերը, ինչպիսիք են թվային նիշերը, ալֆա նիշերը, չտպող նիշերը… անհրաժեշտ բջիջների ցանկից:

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներԽնդրում եմ արեք հետևյալ կերպ

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

2, Մեջ Հեռացնել նիշերը երկխոսության տուփ:

  • Ստուգում Սովորություն տարբերակով Հեռացնել նիշերը բաժնում:
  • Եվ այնուհետև մուտքագրեք հատուկ նիշերը տեքստային տուփի մեջ, որը ցանկանում եք հեռացնել:
  • Այնուհետեւ կտտացրեք Ok or Դիմել կոճակ՝ ձեր նշած նիշերը միանգամից հեռացնելու համար: Տես սքրինշոթը.

Ներբեռնեք և անվճար փորձեք Kutools- ը Excel- ի համար:


2.2 Հեռացրեք բոլոր թվերը տեքստային տողերից

Եթե ​​դուք ունեք տեքստային տողերի ցանկ, որոնք խառնվում են թվերի, տառերի և հատուկ նիշերի հետ, և այժմ, դուք պարզապես ցանկանում եք հեռացնել բոլոր թվերը և պահպանել այլ նիշերը: Այս բաժինը կտրամադրի ձեզ օգնելու մի քանի հարմար եղանակներ:

 Հեռացրեք թվերը տեքստային տողերից SUBSTITUTE ֆունկցիայով

Excel-ում տեղադրված SUBSTITUTE ֆունկցիան կարող է օգնել փոխարինել բոլոր թվերը ոչնչով, ուստի կարող եք օգտագործել ստորև բերված բանաձևը՝ բոլոր թվերը բջիջներից հեռացնելու համար.

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A2,1,""),2,""),3,""),4,""),5,""),6,""),7,""),8,""),9,""),0,"")

Այնուհետև քաշեք լրացման բռնակը դեպի այն բջիջները, որտեղ ցանկանում եք կիրառել այս բանաձևը, և ​​բոլոր թվերը կջնջվեն տեքստային տողերի ցանկից, տես սքրինշոթը.


 Հեռացրեք թվերը տեքստային տողերից TEXTJOIN գործառույթով

Եթե ​​ունեք Excel 2019, 2021 կամ 365, նոր TEXTJOIN ֆունկցիան կարող է նաև օգնել հեռացնել թվերը տեքստային տողերից:

Խնդրում ենք պատճենել հետևյալ բանաձևը դատարկ բջիջի մեջ, այնուհետև սեղմել Ctrl + Shift + Enter ստեղները միասին՝ առաջին արդյունքը ստանալու համար.

=TEXTJOIN("", TRUE, IF(ISERR(MID(A2, ROW(INDIRECT( "1:"&LEN(A2) )), 1) *1), MID(A2, ROW(INDIRECT("1:"&LEN(A2))), 1), ""))

Եվ այնուհետև պատճենեք բանաձևը ստորև գտնվող այլ բջիջներում, որտեղ ցանկանում եք կիրառել այս բանաձևը, տես սքրինշոթը.

ՆշումԱյս TEXTJOIN-ը հասանելի է միայն Excel 2019, 2021 և Office 365 տարբերակներում:


 Հեռացրեք համարները տեքստի տողերից ՝ օգտագործողի կողմից սահմանված գործառույթով

Բացի վերը նշված երկու բանաձևերից, օգտագործողի կողմից սահմանված գործառույթը կարող է նաև ձեզ լավություն անել, խնդրում ենք կատարել հետևյալ քայլերը.

1, Պահեք պահեք Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներև տեղադրեք հետևյալ կոդը մոդուլի պատուհանում:

VBA կոդ. Հեռացրեք թվերը տեքստային տողերից

Function RemoveNumbers(Txt As String) As String
'Updateby Extendoffice
With CreateObject("VBScript.RegExp")
.Global = True
.Pattern = "[0-9]"
RemoveNumbers = .Replace(Txt, "")
End With
End Function

3. Այնուհետև փակեք և դուրս եկեք ծածկագրի պատուհանից, վերադարձեք աշխատաթերթ և մուտքագրեք այս բանաձևը. = Հեռացնել համարները (A2) դատարկ բջիջի մեջ, այնուհետև քաշեք լրացման բռնակը դեպի այն բջիջները, որտեղ ցանկանում եք կիրառել այս բանաձևը, տես սքրինշոթը.


 Հեռացրեք թվերը տեքստային տողերից հարմար տարբերակով

Եթե ​​հոգնել եք բարդ բանաձևերից, հիմա թույլ տվեք ցույց տալ ձեզ մի հեշտ գործիք. Excel- ի համար նախատեսված գործիքներ'S Հեռացնել նիշերը. Այս հարմար հատկանիշով դուք կարող եք կատարել այս խնդիրը միայն մի քանի կտտոցով:

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներԽնդրում եմ արեք հետևյալ կերպ

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

2, Մեջ Հեռացնել նիշերը երկխոսության տուփ, խնդրում ենք կատարել հետևյալ գործողությունները.

  • Ստուգում Թվային տարբերակով Հեռացնել նիշերը բաժնում:
  • Այնուհետեւ կտտացրեք Ok or Դիմել կոճակը՝ թվերն անմիջապես հեռացնելու համար: Տես սքրինշոթը.

Ներբեռնեք և անվճար փորձեք Kutools- ը Excel- ի համար:


2.3 Հեռացրեք ոչ թվային նիշերը տեքստային տողերից

Բոլոր ոչ թվային նիշերը հեռացնելու և տեքստային տողերից միայն թվերը պահելու համար այս բաժնում կխոսենք Excel-ում այս առաջադրանքը լուծելու որոշ ուղիների մասին:

 Հեռացրեք ոչ թվային նիշերը տեքստային տողերից բանաձևով Excel 2016-ում և ավելի վաղ տարբերակներում

Եթե ​​դուք օգտագործում եք Excel 2016 կամ ավելի վաղ տարբերակները, դուք պետք է կիրառեք բարդ բանաձև այս աշխատանքին հասնելու համար, խնդրում ենք պատճենել կամ մուտքագրել ստորև բերված բանաձևը դատարկ բջիջի մեջ.

=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)

Եվ այնուհետև պատճենեք բանաձևը ստորև գտնվող այլ բջիջներում, որտեղ ցանկանում եք կիրառել այս բանաձևը, տես սքրինշոթը.

ՆշումԵթե ​​տեքստային տողում թվերը սկսվում են 0-ով, 0-ը կկորչի:


 Հեռացրեք ոչ թվային նիշերը տեքստային տողերից TEXTJOIN գործառույթով Excel 2019, 2021, 365-ում

Վերոհիշյալ բանաձևը կարող է չափազանց դժվար հասկանալ մեզանից շատերի համար: Եթե ​​ունեք Excel 2019, 2021 կամ 365, կա մի կոկիկ բանաձև, որը կարող է օգնել ձեզ:

Խնդրում ենք պատճենել կամ մուտքագրել հետևյալ բանաձևը դատարկ բջիջի մեջ և սեղմել Ctrl + Shift + Մուտք բանալիները միասին՝ առաջին ճիշտ արդյունքը ստանալու համար.

=TEXTJOIN("",TRUE,IFERROR(MID(A2,ROW(INDIRECT("1:100")),1)+0,""))

Այնուհետև քաշեք լրացման բռնակը դեպի այն բջիջները, որտեղ կկիրառեք այս բանաձևը, և ​​դուք կստանաք արդյունքը, ինչպես ցույց է տրված ստորև նշված սքրինշոթը.

ՆշումԱյս բանաձևով դուք կարող եք տեսնել, որ առաջատար 0-երը կպահվեն, քանի որ թվերը վերադարձվում են որպես տեքստ:


 Հեռացրեք ոչ թվային նիշերը տեքստային տողերից Օգտատիրոջ կողմից սահմանված գործառույթով

Իհարկե, դուք կարող եք նաև ստեղծել ձեր սեփական Օգտատիրոջ կողմից սահմանված գործառույթը ավելի պարզ շարահյուսությամբ, խնդրում ենք անել այսպես.

1, Պահեք պահեք Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներև տեղադրեք հետևյալ կոդը մոդուլի պատուհանում:

VBA կոդը. Հեռացրեք ոչ թվային նիշերը տեքստային տողերից

Function Removenonnumeric(str As String) As String
'Updateby Extendoffice
    With CreateObject("VBScript.RegExp")
        .Global = True
        .Pattern = "[^0-9]"
        Removenonnumeric = .Replace(str, "")
    End With
End Function

3. Այնուհետև փակեք և դուրս եկեք ծածկագրի պատուհանից, վերադարձեք աշխատաթերթ և մուտքագրեք այս բանաձևը. =Հեռացնել թվային (A2) դատարկ բջիջի մեջ, այնուհետև քաշեք լրացման բռնակը ներքև դեպի այն բջիջները, որտեղ ցանկանում եք կիրառել այս բանաձևը, միայն թվերը կարտահանվեն, ինչպես ցույց է տրված ստորև նշված սքրինշոթը.


 Հեռացրեք ոչ թվային նիշերը տեքստային տողերից մի պարզ հատկանիշով

Մի շարք բջիջներում ուղղակիորեն ջնջելու ոչ թվային նիշերը, Excel- ի համար նախատեսված գործիքներ'S Հեռացնել նիշերը կոմունալ ծրագիրը կարող է դա անել միայն մի քանի կտտոցով:

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներԽնդրում եմ արեք հետևյալ կերպ

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

2, Մեջ Հեռացնել նիշերը երկխոսության տուփ, խնդրում ենք սահմանել հետևյալ գործողությունները.

  • Ստուգում Ոչ թվային տարբերակով Հեռացնել նիշերը բաժնում:
  • Այնուհետեւ կտտացրեք Ok or Դիմել կոճակ՝ բոլոր ոչ թվային նիշերն անմիջապես հեռացնելու համար: Տես սքրինշոթը.

Ներբեռնեք և անվճար փորձեք Kutools- ը Excel- ի համար:


2.4 Առանձնացրեք տեքստը և թվերը մեկ բջիջից երկու սյունակի

Երբեմն, գուցե ցանկանաք տեքստը և թվերը հանել տեքստային տողերից երկու առանձնացված սյունակներում, հետևյալ մեթոդների օգնությամբ դուք կարող եք արագ և հեշտությամբ ավարտել այս առաջադրանքը:

 Տեքստը և թվերը բաժանեք մեկ բջիջից երկու սյունակի՝ օգտագործողի կողմից սահմանված գործառույթով

Օգտագործելով հետևյալ Օգտագործողի կողմից սահմանված գործառույթը, դուք կարող եք միանգամից հանել տեքստը և թվերը, խնդրում ենք կատարել հետևյալ քայլերը.

1, Պահեք պահեք Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներև տեղադրեք հետևյալ կոդը մոդուլի պատուհանում:

VBA կոդ. Տեքստը և թվերը բաժանեք տեքստային տողերից երկու սյունակի

Function SplitText(pWorkRng As Range, pIsNumber As Boolean) As String
'Updateby Extendoffice
Dim xLen As Long
Dim xStr As String
xLen = VBA.Len(pWorkRng.Value)
For i = 1 To xLen
    xStr = VBA.Mid(pWorkRng.Value, i, 1)
    If ((VBA.IsNumeric(xStr) And pIsNumber) Or (Not (VBA.IsNumeric(xStr)) And Not (pIsNumber))) Then
        SplitText = SplitText + xStr
    End If
Next
End Function

3. Այնուհետև փակեք և դուրս եկեք ծածկագրի պատուհանից, վերադարձեք աշխատաթերթ և մուտքագրեք այս բանաձևը. = SplitText (A2, FALSE) դատարկ բջիջի մեջ և այնուհետև քաշեք լրացման բռնակը ներքև դեպի այն բջիջները, որոնք ցանկանում եք լրացնել այս բանաձևը՝ ամբողջ տեքստը ստանալու համար, տես սքրինշոթը.

4. Եվ հետո, շարունակեք մուտքագրել այս բանաձևը. = SplitText (A2, TRUE) մեկ այլ բջիջի մեջ և լրացնելու բռնիչը ներքև քաշեք դեպի այն բջիջները, որոնք ցանկանում եք լրացնել այս բանաձևը ՝ համարները ստանալու համար, տեսեք,


 Առանձնացրեք տեքստը և թվերը մեկ բջիջից երկու սյունակի՝ հեշտ հատկանիշով

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

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներԽնդրում եմ արեք հետևյալ կերպ

1. Ընտրեք բջիջների շրջանակը, որը ցանկանում եք բաժանել, այնուհետև սեղմեք Կուտոլս > Միաձուլում և պառակտում > Պառակտված բջիջներ, տես նկարի նկարը.

2, Մեջ Պառակտված բջիջներ երկխոսության տուփ, ընտրեք Բաժանել սյունակների տարբերակով Տիպ բաժինը, ապա ստուգեք Տեքստը և համարը - ից Բաժանվել է բաժին, տես նկարի նկարը.

3, Դրանից հետո կտտացրեք Ok կոճակ և մեկ այլ Պառակտված բջիջներ Դուրս կբացվի երկխոսության տուփ, ընտրեք բջիջ՝ առանձնացված տեքստը և թվերը դուրս բերելու համար, այնուհետև կտտացրեք կոճակին OK կոճակը։ Այժմ դուք կարող եք տեսնել, որ ընտրված բջիջներում տեքստը և թվերը բաժանված են միանգամից երկու սյունակի, ինչպես ցույց է տրված ստորև ներկայացված ցուցադրումը.

Ներբեռնեք և անվճար փորձեք Kutools- ը Excel- ի համար:


2.5 Հեռացրեք տողերի ընդմիջման նիշերը տեքստային տողերից

Գծի ընդմիջումը մի բան է, որը թույլ է տալիս Excel-ում մի քանի տող ունենալ նույն բջիջում: Երբեմն, երբ դուք պատճենում եք տվյալները վեբկայքից կամ առանձնացնում եք ձեր բջջային բովանդակությունը Alt + Enter բանալիները ձեռքով, դուք կստանաք գծի ընդմիջում կամ փոխադրման վերադարձ: Որոշ դեպքերում, դուք կարող եք ջնջել գծերի ընդմիջումները, որպեսզի բջջային բովանդակությունը մեկ տող դարձնի, ինչպես ցույց է տրված ստորև նշված սքրինշոթը: Այստեղ ես կներկայացնեմ Excel-ում այս խնդիրը լուծելու մի քանի եղանակ:

 Հեռացրեք տողերի ընդմիջման նիշերը տեքստային տողերից «Գտնել և փոխարինել» գործառույթով

Excel- ում կարող եք օգտագործել Գտնել եւ փոխարինել տողերի ընդմիջումները հեռացնելու հատկանիշ, խնդրում ենք անել այսպես.

1. Ընտրեք տվյալների տիրույթը, որտեղից ցանկանում եք հեռացնել տողերի ընդմիջումները:

2, Դրանից հետո կտտացրեք Գլխավոր > Գտեք և ընտրեք > Փոխարինել (կամ սեղմել Ctrl + H բանալիներ) գնալ Գտնել եւ փոխարինել երկխոսության տուփ, տես նկարի նկարը.

3, Դուրս ցցված Գտնել եւ փոխարինել երկխոսության տուփ, խնդրում ենք կատարել հետևյալ գործողությունները.

  • Տեղադրեք կուրսորը մեջ Գտեք ինչ դաշտ և մամուլ Ctrl + J ստեղնաշարի վրա դուք կարող եք ոչինչ չտեսնել, բայց գծի ընդմիջման նշանը տեղադրվել է:
  • Է Փոխարինեք հետ դաշտը, թողեք այս դաշտը դատարկ՝ պարզապես ջնջելու տողերի ընդմիջումները կամ սեղմեք կոճակը Տիեզերական բr մեկ անգամ՝ տողերի ընդմիջումները դատարկներով փոխարինելու համար:

4, Դրանից հետո կտտացրեք Փոխարինեք բոլորը կոճակով, ընտրված բջիջներում բոլոր տողերի ընդմիջումները միանգամից կջնջվեն կամ կփոխարինվեն դատարկներով: Տես սքրինշոթը.


 Հեռացրեք տողերի ընդմիջման նիշերը տեքստային տողերից SUBSTITUTE ֆունկցիայով

Կարող եք նաև բանաձև ստեղծել՝ հիմնված SUBSTITUTE և CHAR ֆունկցիաների վրա՝ տեքստային տողերից տողերի ընդմիջումները հեռացնելու համար:

Արդյունքը ստանալու համար խնդրում ենք կիրառել հետևյալ բանաձևը.

=SUBSTITUTE(A2,CHAR(10),"")

TipsSUBSTITUTE ֆունկցիան գտնում և փոխարինում է CHAR(10) նիշը, որը ներկայացնում է տողի ընդմիջման նշանը ոչինչով: Եթե ​​ցանկանում եք, որ արդյունքը բաժանվի ստորակետով և բացատով, կարող եք օգտագործել հետևյալ բանաձևը.

=SUBSTITUTE(A2,CHAR(10),", ")


 Հեռացրեք տողերի ընդմիջման նիշերը տեքստային տողերից VBA կոդով

Եթե ​​ձեզ հարմար է VBA կոդը օգտագործելը, այստեղ նաև ձեզ համար կոդ է տրամադրվում, խնդրում ենք կատարել հետևյալ քայլերը.

1, Պահեք պահեք Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներև տեղադրեք հետևյալ կոդը մոդուլի պատուհանում:

VBA կոդ. Հեռացրեք տողերի ընդմիջումները տեքստային տողերից

Sub RemoveCarriage()
'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
    Rng.Value = Replace(Rng.Value, Chr(10), "")
Next
End Sub

3, Հետո, սեղմեք F5 բանալին գործարկելու համար այս կոդը, և կհայտնվի հուշման տուփ, ընտրեք այն միջակայքը, որը ցանկանում եք հեռացնել տողերի ընդմիջումները, տես սքրինշոթը.

4, Եվ հետո, կտտացրեք OK կոճակը, բոլոր տողերի ընդմիջումները կջնջվեն ընտրված տվյալների տիրույթից:


 Հեռացրեք տողերի ընդմիջման նիշերը տեքստային տողերից խելացի տարբերակով

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

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներԽնդրում եմ արեք հետևյալ կերպ

1. Ընտրեք բջիջների շրջանակը, որտեղ ցանկանում եք հեռացնել տողերի ընդմիջումները, այնուհետև սեղմեք Կուտոլս > Տեքստ > Հեռացնել նիշերը.

2, Մեջ Հեռացնել նիշերը երկխոսության տուփ, խնդրում ենք սահմանել հետևյալ գործողությունները.

  • Ստուգում Ոչ տպագրական տարբերակով Հեռացնել նիշերը բաժնում:
  • Այնուհետեւ կտտացրեք Ok or Դիմել կոճակ՝ ընտրված տվյալների տիրույթից գծերի բոլոր ընդմիջումները հեռացնելու համար: Տես սքրինշոթը.

Ներբեռնեք և անվճար փորձեք Kutools- ը Excel- ի համար:


2.6 Հեռացրեք բացատները (առաջատար, հետին, լրացուցիչ կամ բոլոր բացատները) տեքստային տողերից

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

 Հեռացրեք ավելորդ բացատները (առաջատար, հետևող, ավելորդ) տեքստային տողերից TRIM գործառույթով

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

Ստորև բերված բանաձևը մուտքագրեք դատարկ բջիջ.

=TRIM(A2)

Եվ այնուհետև քաշեք լրացման բռնակը ներքև՝ այլ բջիջների բանաձևը պատճենելու համար, այժմ դուք կարող եք տեսնել, որ բոլոր առաջատար, հետին բացատները և բառերի միջև հավելյալ բացերը միանգամից հեռացվում են էկրանի նկարից.


 Հեռացրեք բոլոր բացատները տեքստային տողերից

Եթե ​​ցանկանում եք հեռացնել բոլոր բացատները տեքստային տողերից, հետևյալ SUBSTITUTE ֆունկցիան և Find & Replace ֆունկցիան կարող են ձեզ լավություն անել:

Օգտագործելով SUBSTITUTE ֆունկցիան

Դուք կարող եք օգտագործել SUBSTITUTE ֆունկցիան՝ բոլոր բացատները ոչնչով փոխարինելու համար, խնդրում ենք կիրառել ստորև բերված բանաձևը դատարկ բջիջի մեջ.

=SUBSTITUTE(A2," ","")

Այնուհետև քաշեք լրացման բռնակը ներքև՝ այս բանաձևը պատճենելու ձեզ անհրաժեշտ այլ բջիջներում, և բոլոր բացատները կջնջվեն, ինչպես ցույց է տրված ստորև ներկայացված սքրինշոթը.


Օգտագործելով «Գտնել և փոխարինել» գործառույթը

Փաստորեն, այն Գտեք և փոխարինեք Excel-ի գործառույթը կարող է նաև օգնել ազատվել ընտրված բջիջներից բոլոր բացատներից, խնդրում ենք կատարել հետևյալ քայլերը.

1. Ընտրեք տվյալների տիրույթը, որտեղից ցանկանում եք հեռացնել բոլոր բացատները:

2, Դրանից հետո կտտացրեք Գլխավոր > Գտեք և ընտրեք > Փոխարինել (կամ սեղմել Ctrl + H բանալիներ) գնալ դեպի Գտնել եւ փոխարինել բացված երկխոսության վանդակում Գտնել եւ փոխարինել երկխոսության տուփ, խնդրում ենք կատարել ստորև նշված գործողությունները.

  • մամուլ Տիեզերական բար է Գտեք ինչ դաշտային;
  • Է Փոխարինեք հետ դաշտ, թողեք այս դաշտը դատարկ:

3, Եվ հետո, կտտացրեք Փոխարինեք բոլորը կոճակով, ընտրված բջիջների բոլոր բացատները միանգամից կջնջվեն: Տես սքրինշոթը.


 Հեռացրեք բոլոր տեսակի բացատները տեքստային տողերից հզոր հատկանիշով

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

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներԽնդրում եմ արեք հետևյալ կերպ

1. Ընտրեք տվյալների տիրույթը, որտեղից կհեռացնեք բացատները, այնուհետև սեղմեք Կուտոլս > Տեքստ > Հեռացնել տարածությունները, Տեսեք,

2, Մեջ Հեռացնել տարածությունները երկխոսության վանդակում ընտրեք մեկ տարածության տեսակ, որը ցանկանում եք հեռացնել Տարածքների տեսակը:

  • Հեռացրեք առաջատար բացատները, խնդրում ենք ընտրել Առաջատար տարածքներ տարբերակ;
  • Հեռացրեք հետագծերը, խնդրում ենք ընտրել Հետիոտ տարածքներ տարբերակ;
  • Միանգամից հեռացրեք առաջատար և հետին բացատները, խնդրում ենք ընտրել Առաջատար և հետևյալ տարածքներ տարբերակ;
  • Հեռացրեք բոլոր ավելորդ բացատները, խնդրում ենք ընտրել Բոլոր ավելցուկային տարածքները տարբերակ;
  • Հեռացրեք բոլոր բացատները, խնդրում ենք ընտրել Բոլոր տարածությունները տարբերակ.

3, Դրանից հետո կտտացրեք Ok or Դիմել կոճակը, դուք կստանաք անհրաժեշտ արդյունքը:

Ներբեռնեք և անվճար փորձեք Kutools- ը Excel- ի համար:


Հեռացրեք նիշերը / տեքստը կոնկրետ նիշից առաջ կամ հետո

Այս բաժնում ես կներկայացնեմ որոշակի նիշի առաջին, վերջին կամ n-րդ հայտնվելուց առաջ կամ հետո տեքստը կամ նիշերը հեռացնելու մի քանի գործողություններ:

3.1 Հեռացրեք տեքստը առաջին հատուկ նիշից առաջ կամ հետո

Եթե ​​ցանկանում եք հեռացնել տեքստը առաջին հատուկ նիշից առաջ կամ հետո, ինչպիսիք են բացատը, ստորակետը տեքստային տողերի ցանկից, ինչպես ցույց է տրված ստորև նշված սքրինշոթը, այստեղ ես ձեզ համար կտեղադրեմ երկու մեթոդ:

 Հեռացրեք տեքստը առաջին հատուկ նիշից առաջ բանաձևով

Առաջին հատուկ նիշից առաջ տեքստը կամ նիշերը հեռացնելու համար կարող եք ստեղծել բանաձև՝ հիմնված RIGHT, LEN և FIND ֆունկցիաների վրա, ընդհանուր շարահյուսությունը հետևյալն է.

=RIGHT(cell, LEN(cell)-FIND("char", cell))
  • բջիջԲջջի հղումը կամ տեքստային տողը, որից ցանկանում եք հեռացնել տեքստը.
  • կառքՀատուկ տարանջատիչը, որի հիման վրա ցանկանում եք հեռացնել տեքստը:

Օրինակ, ցուցակի տողերից առաջին ստորակետից առաջ ամեն ինչ հեռացնելու համար դուք պետք է կիրառեք հետևյալ բանաձևը դատարկ բջիջի մեջ, այնուհետև քաշեք այն դեպի ձեզ անհրաժեշտ բջիջները, տես սքրինշոթը.

=RIGHT(A2,LEN(A2)-FIND(",",A2))

ՆշումՎերը նշված բանաձեւով. A2 այն բջիջն է, որտեղից ցանկանում եք հեռացնել տեքստը. , այն հատուկ նիշն է, որի հիման վրա ցանկանում եք հեռացնել տեքստը, դուք կարող եք այն փոխել ցանկացած այլ նիշի, ինչպես ձեզ անհրաժեշտ է:


 Հեռացրեք տեքստը առաջին հատուկ նիշից հետո բանաձևով

Առաջին հատուկ նիշից հետո ամեն ինչ հեռացնելու համար կարող եք օգտագործել LEFT և FIND ֆունկցիաները՝ արդյունքը ստանալու համար, ընդհանուր շարահյուսությունը հետևյալն է.

=LEFT(cell,FIND("char",cell)-1)
  • բջիջԲջջի հղումը կամ տեքստային տողը, որից ցանկանում եք հեռացնել տեքստը.
  • կառքՀատուկ տարանջատիչը, որի հիման վրա ցանկանում եք հեռացնել տեքստը:

Այժմ, խնդրում ենք մուտքագրել ստորև բերված բանաձևը դատարկ բջիջի մեջ, այնուհետև քաշել լցման բռնակը դեպի մյուս բջիջները, որտեղ ցանկանում եք կիրառել այս բանաձևը, և ​​առաջին ստորակետից հետո բոլոր նիշերը միանգամից կհեռացվեն, տես սքրինշոթը.

=LEFT(A2,FIND(",",A2)-1)


3.2 Հեռացնել տեքստը նիշերի N-րդ հայտնվելուց առաջ կամ հետո

Երբեմն, տեքստային տողերը պարունակում են որոշակի սահմանազատիչի մի քանի օրինակներ, դուք կարող եք հեռացնել բոլոր նիշերը կոնկրետ օրինակից առաջ կամ հետո, օրինակ՝ երկրորդ, երրորդ կամ չորրորդը, ըստ անհրաժեշտության: Այս տեսակի հեռացման հետ գործ ունենալու համար կարող եք օգտագործել հետևյալ հնարքները.

 Հեռացրեք տեքստը բանաձևով նիշերի N-րդ հայտնվելուց առաջ

Տեքստը հեռացնելու համար նախքան կոնկրետ նիշի N-րդ հայտնվելը, հետևյալ բանաձևը կարող է օգնել ձեզ, ընդհանուր շարահյուսությունը հետևյալն է.

=RIGHT(cell,LEN(cell)-FIND("#",SUBSTITUTE(cell,"char","#",N)))
  • բջիջԲջջի հղումը կամ տեքստային տողը, որից ցանկանում եք հեռացնել տեքստը.
  • կառքՀատուկ բաժանարար, որի հիման վրա ցանկանում եք հեռացնել տեքստը.
  • NՆիշերի առաջացումը, որից առաջ պետք է հեռացնել տեքստը:

Օրինակ, տեքստային տողերից երկրորդ ստորակետից առաջ ամեն ինչ հեռացնելու համար դուք պետք է կիրառեք հետևյալ բանաձևը.

=RIGHT(A2,LEN(A2)-FIND("#",SUBSTITUTE(A2,",","#",2)))

ՆշումՎերը նշված բանաձեւով. A2 այն բջիջն է, որտեղից ցանկանում եք հեռացնել տեքստը. , այն հատուկ նիշն է, որի հիման վրա ցանկանում եք հեռացնել տեքստը, դուք կարող եք այն փոխել ցանկացած այլ նիշի, ինչպես ձեզ անհրաժեշտ է. 2 ցույց է տալիս n-րդ ստորակետը, որից առաջ ցանկանում եք հեռացնել տեքստը:

Եվ այնուհետև քաշեք լրացման բռնիչը՝ բանաձևը այլ բջիջներ պատճենելու համար, տես սքրինշոթը.


 Հեռացրեք տեքստը բանաձևով նիշերի N-րդ հայտնվելուց հետո

Տեքստը հեռացնելու համար հատուկ առանձնացնողի N-րդ դեպքից հետո, LEFT, SUBSTITUTE և FIND գործառույթները կարող են ձեզ լավություն անել: Ընդհանուր շարահյուսությունը հետևյալն է.

=LEFT(cell, FIND("#", SUBSTITUTE(cell, "char", "#", N)) -1)
  • բջիջԲջջի հղումը կամ տեքստային տողը, որից ցանկանում եք հեռացնել տեքստը.
  • կառքՀատուկ բաժանարար, որի հիման վրա ցանկանում եք հեռացնել տեքստը.
  • NՆիշերի առաջացումը, որից հետո հեռացնել տեքստը:

Երբ հասկանաք հիմնական շարահյուսությունը, խնդրում ենք պատճենել կամ մուտքագրել ստորև բերված բանաձևը դատարկ բջիջի մեջ.

=LEFT(A2, FIND("#", SUBSTITUTE(A2, ",", "#", 2)) -1)

ՆշումՎերը նշված բանաձեւով. A2 այն բջիջն է, որտեղից ցանկանում եք հեռացնել տեքստը. , այն հատուկ նիշն է, որի հիման վրա ցանկանում եք հեռացնել տեքստը, դուք կարող եք այն փոխել ցանկացած այլ նիշի, ինչպես ձեզ անհրաժեշտ է. 2 ցույց է տալիս n-րդ ստորակետը, որից հետո ցանկանում եք հեռացնել տեքստը:

Այնուհետև քաշեք լրացման բռնիչը՝ բանաձեւը այլ բջիջներ պատճենելու համար, և երկրորդ ստորակետից հետո բոլոր նիշերը միանգամից կջնջվեն, տես սքրինշոթը.


 Հեռացրեք տեքստը նիշերի n-րդ հայտնվելուց առաջ կամ հետո Օգտատիրոջ կողմից սահմանված գործառույթով

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

1, Պահեք պահեք Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներև տեղադրեք հետևյալ կոդը մոդուլի պատուհանում:

VBA կոդ. Հեռացրեք տեքստը նիշերի N-րդ հայտնվելուց առաջ կամ հետո

Function RemoveTextOccurrence(Str As String, Delimiter As String, Occurrence As Integer, IsAfter As Boolean)
Dim xStr As String
Dim xStrLen, xF, xIntStart As Integer
xStr = Str
xStrLen = Len(xStr)
xIntStart = 1
For xF = 1 To Occurrence
xIntStart = InStr(xIntStart + 1, xStr, Delimiter, vbTextCompare)
If (xIntStart = 0) Or (xIntStart < 0) Then
    If IsAfter Then
    RemoveTextOccurrence = xStr
    Else
    RemoveTextOccurrence = ""
    End If
    Exit Function
End If
Next
If IsAfter Then
    RemoveTextOccurrence = Mid(Str, 1, xIntStart - 1)
Else
    RemoveTextOccurrence = Mid(Str, xIntStart + 1)
End If
End Function

3. Այնուհետև փակեք և դուրս եկեք կոդի պատուհանից, վերադարձեք աշխատաթերթ, օգտագործեք հետևյալ բանաձևերը.

Հեռացնել տեքստը մինչև ստորակետի երկրորդ հայտնվելը.

=RemoveTextOccurrence(A2, ", ", 2, FALSE)

Հեռացրեք տեքստը ստորակետի երկրորդ հայտնվելուց հետո

=RemoveTextOccurrence(A2, ", ", 2, TRUE)


3.3 Հեռացրեք տեքստը նիշի վերջին հայտնվելուց առաջ կամ հետո

Եթե ​​Ձեզ անհրաժեշտ է հեռացնել ամբողջ տեքստը վերջին հատուկ նիշից առաջ կամ հետո, և ենթատողերը թողնել միայն վերջին հատուկ նիշից հետո կամ դրանից առաջ, ինչպես ցույց է տրված ստորև նշված սքրինշոթը, այս բաժնում կխոսեն այս խնդիրը լուծելու որոշ բանաձևերի մասին:

 Հեռացրեք տեքստը բանաձևով նիշի վերջին հայտնվելուց առաջ

Բոլոր նիշերը հեռացնելու համար նախքան նիշի վերջին հայտնվելը, ընդհանուր շարահյուսությունը հետևյալն է.

=RIGHT(cell,LEN(cell)-SEARCH("#",SUBSTITUTE(cell,"char","#",LEN(cell)-LEN(SUBSTITUTE(cell,"char","")))))
  • բջիջԲջջի հղումը կամ տեքստային տողը, որից ցանկանում եք հեռացնել տեքստը.
  • կառքՀատուկ բաժանարար, որի հիման վրա ցանկանում եք հեռացնել տեքստը.

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

=RIGHT(A2,LEN(A2)-SEARCH("#",SUBSTITUTE(A2,",","#",LEN(A2)-LEN(SUBSTITUTE(A2,",","")))))

ՆշումՎերը նշված բանաձեւով. A2 այն բջիջն է, որտեղից ցանկանում եք հեռացնել տեքստը. , այն հատուկ նիշն է, որի հիման վրա ցանկանում եք հեռացնել տեքստը, դուք կարող եք այն փոխել ցանկացած այլ նիշի, ինչպես ձեզ անհրաժեշտ է:

Այնուհետև քաշեք լրացման բռնիչը՝ բանաձևը այլ բջիջներ պատճենելու համար, և բոլոր նիշերը մինչև վերջին ստորակետը կջնջվեն, ինչպես ցույց է տրված ստորև նշված սքրինշոթը.


 Հեռացրեք տեքստը բանաձևերով նիշի վերջին հայտնվելուց հետո

Եթե ​​բջիջների արժեքներն առանձնացված են փոփոխական թվով սահմանազատիչներով, այժմ, դուք ցանկանում եք ջնջել ամեն ինչ այդ սահմանազատիչի վերջին օրինակից հետո, ընդհանուր շարահյուսությունը հետևյալն է.

=LEFT(cell,FIND("#",SUBSTITUTE(cell,"char","#",LEN(cell)-LEN(SUBSTITUTE(cell,"char",""))))-1)
  • բջիջԲջջի հղումը կամ տեքստային տողը, որից ցանկանում եք հեռացնել տեքստը.
  • կառքՀատուկ բաժանարար, որի հիման վրա ցանկանում եք հեռացնել տեքստը.

Խնդրում ենք պատճենել կամ մուտքագրել ստորև բերված բանաձևը դատարկ բջիջի մեջ, այնուհետև քաշել լրացման բռնակը ներքև՝ ձեզ անհրաժեշտ այլ արդյունքներ ստանալու համար, տես սքրինշոթը.

=LEFT(A2,FIND("#",SUBSTITUTE(A2,",","#",LEN(A2)-LEN(SUBSTITUTE(A2,",",""))))-1)

ՆշումՎերը նշված բանաձեւով. A2 այն բջիջն է, որտեղից ցանկանում եք հեռացնել տեքստը. , այն հատուկ նիշն է, որի հիման վրա ցանկանում եք հեռացնել տեքստը, դուք կարող եք այն փոխել ցանկացած այլ նիշի, ինչպես ձեզ անհրաժեշտ է:


3.4 Հեռացրեք տեքստը փակագծերի միջև

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

 Հեռացրեք տեքստը փակագծերի միջև Գտնել և փոխարինել գործառույթով

Excel-ում ներկառուցված «Գտնել և փոխարինել» գործառույթը կարող է օգնել ձեզ գտնել բոլոր տեքստերը փակագծերում, այնուհետև դրանք փոխարինել ոչնչով: Խնդրում ենք անել այսպես.

1. Ընտրեք տվյալների ցանկը, որը ցանկանում եք հեռացնել փակագծերի միջև եղած տեքստերը:

2, Դրանից հետո կտտացրեք Գլխավոր > Գտեք և ընտրեք > Փոխարինել (կամ սեղմել Ctrl + H ստեղներ) դեպի Գտնել և փոխարինել երկխոսության վանդակը, Գտնել եւ փոխարինել երկխոսության տուփ, կատարեք հետևյալ գործողությունները.

  • Է Գտեք ինչ դաշտ, տիպ (*) տեքստի տուփի մեջ;
  • Է Փոխարինեք հետ դաշտ, թողեք այս դաշտը դատարկ:

3, Դրանից հետո կտտացրեք Փոխարինեք բոլորը կոճակով, ընտրված բջիջներում փակագծերի բոլոր նիշերը (ներառյալ փակագծերը) միանգամից կջնջվեն: Տես սքրինշոթը.

TipsՄանրամասն Գտնել եւ փոխարինել ֆունկցիան աշխատում է նաև երկու կամ ավելի զույգ փակագծերի համար տեքստային տողերի մեջ:


 Հեռացրեք տեքստը փակագծերի միջև բանաձևով

Բացի «Գտնել և փոխարինել» գործառույթից, դուք կարող եք նաև օգտագործել այս խնդիրը Excel-ում լուծելու բանաձև, ընդհանուր շարահյուսությունը հետևյալն է.

=SUBSTITUTE(text,MID(LEFT(text,FIND(")",text)),FIND("(",text),LEN(text)),"")
  • տեքստՏեքստի տողը կամ բջջային հղումը, որից ցանկանում եք հեռացնել նիշերը:

Այժմ խնդրում ենք պատճենել կամ մուտքագրել հետևյալ բանաձևը դատարկ բջիջի մեջ, որտեղ ցանկանում եք ստանալ արդյունքը.

=SUBSTITUTE(A2,MID(LEFT(A2,FIND(")",A2)),FIND("(",A2),LEN(A2)),"")

Այնուհետև քաշեք լրացման բռնակը դեպի այն բջիջները, որտեղ ցանկանում եք կիրառել այս բանաձևը, և ​​փակագծերում գտնվող բոլոր տեքստերը, ներառյալ փակագծերը, միանգամից կհեռացվեն, տես սքրինշոթը.

TipsԵթե ​​բջիջի արժեքում փակագծեր չկան, վերը նշված բանաձևը կիրառելուց հետո կցուցադրվի սխալ, սխալն անտեսելու համար խնդրում ենք օգտագործել հետևյալ բանաձևը.

=IFERROR(SUBSTITUTE(A2,MID(LEFT(A2,FIND(")",A2)),FIND("(",A2),LEN(A2)),""),A2)


 Հեռացրեք տեքստը փակագծերի միջև օգտագործողի կողմից սահմանված գործառույթով

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

1, Պահեք պահեք Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներև տեղադրեք հետևյալ կոդը մոդուլի պատուհանում:

VBA կոդ. Հեռացրեք տեքստը փակագծերի միջև

Function remtxt(ByVal str As String) As String
'Updateby Extendoffice
  While InStr(str, "(") > 0 And InStr(str, ")") > InStr(str, "(")
    str = Left(str, InStr(str, "(") - 1) & Mid(str, InStr(str, ")") + 1)
  Wend
  remtxt = Trim(str)
End Function

3. Այնուհետև վերադարձեք աշխատաթերթ և մուտքագրեք այս բանաձևը դատարկ բջիջի մեջ. = remtxt (A2), այնուհետև քաշեք լրացման բռնակը դեպի այն բջիջները, որտեղ ցանկանում եք կիրառել այս բանաձևը, բոլոր տեքստերը բոլոր փակագծերում, ներառյալ փակագծերը, կհեռացվեն, ինչպես ցույց է տրված ստորև ներկայացված սքրինշոթը.


Հեռացրեք բառերը տեքստային տողերից

Որոշ դեպքերում, դուք կարող եք հեռացնել որոշ բառեր բջիջների ցանկից, ինչպիսիք են առաջին կամ վերջին բառը, կրկնօրինակ բառերը բջիջից: Այս տեսակի հեռացումները լուծելու համար այս բաժինը ձեզ համար կներկայացնի որոշ մեթոդներ:

4.1 Հեռացնել առաջին կամ վերջին բառը տեքստային տողից

Առաջին կամ վերջին բառը տեքստային տողերի ցանկից հեռացնելու համար հետևյալ բանաձևերը կարող են ձեզ լավություն անել:

 Հեռացրեք առաջին բառը տեքստային տողից բանաձևով

Հեռացրեք առաջին բառերը տեքստային տողերի ցանկից, կարող եք ստեղծել պարզ բանաձև՝ հիմնված RIGHT, LEN և FIND ֆունկցիաների վրա, ընդհանուր շարահյուսությունը հետևյալն է.

=RIGHT(text,LEN(text)-FIND(" ",text))
  • տեքստՏեքստի տողը կամ բջջային հղումը, որից ցանկանում եք հեռացնել առաջին բառը:

Այժմ խնդրում ենք մուտքագրել կամ պատճենել հետևյալ բանաձևը դատարկ բջիջում.

=RIGHT(A2,LEN(A2)-FIND(" ",A2))

Եվ այնուհետև քաշեք լրացման բռնակը ներքև՝ բանաձևը այլ բջիջների վրա կիրառելու համար, տես սքրինշոթը.

TipsԵթե ​​Ձեզ անհրաժեշտ է հեռացնել առաջին N բառերը բջիջներից, խնդրում ենք օգտագործել ստորև բերված բանաձևը.

=MID(TRIM(text),1+FIND("~",SUBSTITUTE(TRIM(text)," ","~",N)),255)
  • տեքստՏեքստի տողը կամ բջջային հղումը, որից ցանկանում եք հեռացնել առաջին n բառը.
  • NՑույց է տալիս, թե քանի բառ եք ուզում հեռացնել տեքստային տողի սկզբից:

Օրինակ, առաջին երկու բառերը բջիջներից հեռացնելու համար խնդրում ենք պատճենել կամ մուտքագրել ստորև բերված բանաձևը դատարկ բջիջի մեջ՝ արդյունքը ստանալու համար, ինչպես պետք է, տես սքրինշոթը.

=MID(TRIM(A2),1+FIND("~",SUBSTITUTE(TRIM(A2)," ","~",2)),255)


  Բանաձևով հեռացնել վերջին բառը տեքստային տողից

Վերջին բառը տեքստային տողերից հեռացնելու համար կարող եք նաև օգտագործել այս խնդիրը լուծելու բանաձև, ընդհանուր շարահյուսությունը հետևյալն է.

=LEFT(TRIM(text),FIND("~",SUBSTITUTE(text," ","~",LEN(TRIM(text))-LEN(SUBSTITUTE(TRIM(text)," ",""))))-1)
  • տեքստՏեքստի տողը կամ բջջային հղումը, որից ցանկանում եք հեռացնել վերջին բառը.

Խնդրում ենք օգտագործել ստորև բերված բանաձևը դատարկ բջիջի մեջ, այնուհետև քաշել լրացման բռնակը ներքև՝ բանաձևը այլ բջիջների վրա կիրառելու համար, տես սքրինշոթը.

=LEFT(TRIM(A2),FIND("~",SUBSTITUTE(A2," ","~",LEN(TRIM(A2))-LEN(SUBSTITUTE(TRIM(A2)," ",""))))-1)

TipsՎերջին N բառերը բջիջների ցանկից հեռացնելու համար ընդհանուր շարահյուսությունը հետևյալն է.

=LEFT(text,FIND("~",SUBSTITUTE(text," ","~",LEN(text)-LEN(SUBSTITUTE(text," ",""))-(N-1))))
  • տեքստՏեքստի տողը կամ բջջային հղումը, որից ցանկանում եք հեռացնել վերջին n բառը.
  • NՑույց է տալիս բառերի քանակը, որոնք ցանկանում եք հեռացնել տեքստային տողի վերջից:

Ենթադրելով, որ վերջին 3 բառերը ջնջեք բջիջների ցանկից, խնդրում ենք օգտագործել ստորև բերված բանաձևը՝ արդյունքը վերադարձնելու համար, տես սքրինշոթը.

=LEFT(A2,FIND("~",SUBSTITUTE(A2," ","~",LEN(A2)-LEN(SUBSTITUTE(A2," ",""))-(3-1))))


4.2 Հեռացրեք կրկնօրինակ նիշերը կամ բառերը բջջի ներսում

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

 Հեռացրեք կրկնօրինակ նիշերը բջջի ներսում՝ օգտագործելով Օգտագործողի կողմից սահմանված գործառույթը

Եթե ​​մեկ բջիջում ունեք միևնույն նիշի բազմաթիվ երևույթներ, բջիջում կրկնօրինակված նիշերը հեռացնելու և միայն առաջին երևույթները պահելու համար, ինչպես ցույց է տրված ստորև նշված սքրինշոթը, կարող եք օգտագործել հետևյալ օգտվողի կողմից սահմանված գործառույթը:

1, Պահեք պահեք Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներև տեղադրեք հետևյալ կոդը մոդուլի պատուհանում:

VBA կոդ. Հեռացրեք կրկնօրինակ նիշերը բջջի ներսում

Function RemoveDupeschars(pWorkRng As Range) As String
'Updateby Extendoffice
Dim xValue As String
Dim xChar As String
Dim xOutValue As String
Set xDic = CreateObject("Scripting.Dictionary")
xValue = pWorkRng.Value
For i = 1 To VBA.Len(xValue)
    xChar = VBA.Mid(xValue, i, 1)
    If xDic.Exists(xChar) Then
    Else
        xDic(xChar) = ""
        xOutValue = xOutValue & xChar
    End If
Next
RemoveDupeschars = xOutValue
End Function

3. Այնուհետև փակեք ծածկագրի պատուհանը, վերադարձեք աշխատաթերթ և մուտքագրեք այս բանաձևը =RemoveDupeschars(A2) ձեր տվյալներից բացի դատարկ բջիջի մեջ, այնուհետև քաշեք լրացման բռնակը դեպի այն բջիջները, որոնք ցանկանում եք կիրառել այս բանաձևը, տես սքրինշոթը.

ՆշումA2 այն տվյալների բջիջն է, որտեղից ցանկանում եք հեռացնել կրկնօրինակ նիշերը:

ԱկնարկՖունկցիան մեծատառերի նկատմամբ զգայուն է, ուստի փոքրատառ և մեծատառերը վերաբերվում են որպես տարբեր նիշերի:


 Հեռացրեք կրկնօրինակ բառերը բջջի ներսում՝ օգտագործելով Օգտատիրոջ կողմից սահմանված գործառույթը

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

1, Պահեք պահեք Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներև տեղադրեք հետևյալ կոդը մոդուլի պատուհանում:

VBA կոդ. Հեռացրեք կրկնօրինակ բառերը բջջի ներսում

Function RemoveDupeswords(txt As String, Optional delim As String = " ") As String
'Updateby Extendoffice
    Dim x
    With CreateObject("Scripting.Dictionary")
        .CompareMode = vbTextCompare
        For Each x In Split(txt, delim)
            If Trim(x) <> "" And Not .exists(Trim(x)) Then .Add Trim(x), Nothing
        Next
        If .Count > 0 Then RemoveDupeswords = Join(.keys, delim)
    End With
End Function

3. Այնուհետև փակեք ծածկագրի պատուհանը, վերադարձեք աշխատաթերթ և մուտքագրեք այս բանաձևը =RemoveDupeswords(A2,", ") ձեր տվյալներից բացի դատարկ բջիջի մեջ, այնուհետև քաշեք լրացման բռնակը դեպի այն բջիջները, որոնք ցանկանում եք կիրառել այս բանաձևը, տես սքրինշոթը.

Նշում: A2 այն բջիջն է, որտեղից ցանկանում եք ջնջել կրկնօրինակ բառերը, և ստորակետն ու բացատը (, ) տեքստային տողերն առանձնացնելու սահմանազատիչներն են, դուք կարող եք դրանք փոխել ձեր կարիքների համար նախատեսված ցանկացած այլ սահմանազատողների:

ԱկնարկԱյս ֆունկցիան մեծատառերի նկատմամբ զգայուն չէ, փոքրատառերը և մեծատառերը համարվում են նույն նիշերը:


4.3 Կտրեք տեքստային տողը N բառի

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

 Կտրեք տեքստային տողը N բառի բանաձևով

Տեքստի տողը N բառով կտրելու համար կարող եք ստեղծել բանաձև՝ հիմնված LEFT, FIND և SUBSTITUTE ֆունկցիաների վրա, ընդհանուր շարահյուսությունը հետևյալն է.

=LEFT(text,FIND("~",SUBSTITUTE(text," ","~",N))-1)
  • տեքստՏեքստի տողը կամ բջջային հղումը, որը ցանկանում եք կտրել;
  • NԲառերի քանակը, որը ցանկանում եք պահել տվյալ տեքստային տողի ձախ կողմից:

Այս աշխատանքով զբաղվելու համար խնդրում ենք պատճենել կամ մուտքագրել ստորև բերված բանաձևը դատարկ բջիջի մեջ.

=LEFT(A2,FIND("~",SUBSTITUTE(A2," ","~",B2))-1)

Եվ այնուհետև քաշեք լրացման բռնակը ներքև՝ այս բանաձևը այլ բջիջների վրա կիրառելու համար, տես սքրինշոթը.


 Կտրեք տեքստային տողը N բառի Օգտատիրոջ կողմից սահմանված գործառույթով

Բացառությամբ վերը նշված բանաձևի, դուք կարող եք նաև ստեղծել Օգտագործողի կողմից սահմանված գործառույթ այս խնդիրը լուծելու համար, խնդրում ենք անել այսպես.

1, Պահեք պահեք Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներև տեղադրեք հետևյալ կոդը մոդուլի պատուհանում:

VBA կոդ. Կտրեք տեքստային տողը N բառի

Function GetNWords(StrWords As String, Num_of_Words As Integer) As String
'Updateby Extendoffice
Dim xArr
Dim xRes As String
Dim xF As Integer
xStr = StrWords
If (Num_of_Words < 1) Then
    GetNWords = ""
    Exit Function
End If
xArr = Split(xStr, " ")
xRes = ""
On Error Resume Next
For xF = 0 To UBound(xArr)
    If Trim(xArr(xF)) <> "" Then
    Num_of_Words = Num_of_Words - 1
        If xRes = "" Then
            xRes = Trim(xArr(xF))
        Else
            xRes = xRes & " " & Trim(xArr(xF))
        End If
    End If
    If Num_of_Words = 0 Then Exit For
Next
If Num_of_Words = 0 Then
    GetNWords = xRes & "..."
Else
    GetNWords = xRes & "..."
End If
End Function

3. Այնուհետև փակեք և դուրս եկեք կոդի պատուհանից, վերադարձեք աշխատաթերթ և մուտքագրեք այս բանաձևը. =GetNWords(A2,B2) դատարկ բջիջի մեջ, այնուհետև քաշեք լրացման բռնակը ներքև՝ այս բանաձևը այլ բջիջների վրա կիրառելու համար, միայն բառերի առաջին հատուկ թիվը պահվում է, ինչպես ցույց է տրված ստորև ներկայացված սքրինշոթը.



  • Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
  • Միաձուլել բջիջները / տողերը / սյունակները և տվյալների պահում; Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերն ու գումարը / միջինը... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
  • Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
  • Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
  • Սիրված և արագ ներդիր բանաձևեր, Ընդգրկույթներ, գծապատկերներ և նկարներ; Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
  • Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
  • Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
  • Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
  • Առանցք սեղանի խմբավորում ըստ շաբաթվա համարը, շաբաթվա օրը և ավելին ... Showույց տալ ապակողպված, կողպված բջիջները տարբեր գույներով; Նշեք այն բջիջները, որոնք ունեն բանաձև / անուն...
kte էջանիշը 201905
  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50% -ով և նվազեցնում է ձեզ համար ամեն օր մկնիկի հարյուրավոր կտտոցներ:
officetab ներքևում
Տեսակավորել մեկնաբանությունները ըստ
մեկնաբանություններ (0)
Դեռևս գնահատականներ չկան: Եղիր առաջինը, ով կգնահատի:
Առայժմ ոչ մի մեկնաբանություն չկա
Թողեք ձեր մեկնաբանությունները
Հրապարակում որպես հյուր
×
Գնահատեք այս գրառումը.
0   Անձնավորություններ
Առաջարկվող վայրեր