ဤသင်ခန်းစာသည် မူရင်းဖော်မြူလာများနှင့် စိတ်ကြိုက်လုပ်ဆောင်ချက်များကို အသုံးပြုခြင်းဖြင့် Excel ရှိ နံပါတ်များနှင့် စာသားများကို ခွဲခြားနည်းကို သင်ကြားပေးမည်ဖြစ်သည်။ စာသားနှင့် နံပါတ်များကို သီးခြားကော်လံနှစ်ခုသို့ ခွဲနည်းကိုလည်း သင်လေ့လာနိုင်မည်ဖြစ်သည်။

ဤအရာကို မြင်ယောင်ကြည့်ပါ- ခွဲခြမ်းစိတ်ဖြာမှုအတွက် ဒေတာအကြမ်းကို သင်လက်ခံရရှိပြီး ကော်လံတစ်ခုတွင် စာသားများနှင့် ဂဏန်းများကို ရောစပ်ထားသည်ကို ရှာဖွေပါ။ အခြေအနေအများစုတွင်၊ ၎င်းတို့ကို အနီးကပ်စစ်ဆေးရန်အတွက် သီးခြားကော်လံများတွင်ထားရှိခြင်းသည် ပိုမိုအဆင်ပြေမည်ဖြစ်သည်။

သင်တစ်သားတည်းဖြစ်နေသောဒေတာဖြင့်လုပ်ဆောင်ပါက၊ ထုတ်ယူရန် LEFT၊ RIGHT နှင့် MID လုပ်ဆောင်ချက်များကို သင်အသုံးပြုနိုင်မည်ဖြစ်သည်။ တူညီသော အနေအထားမှ တူညီသော စာလုံးအရေအတွက်။ သို့သော် ၎င်းသည် ဓာတ်ခွဲခန်းစမ်းသပ်မှုများအတွက် စံပြအခြေအနေတစ်ခုဖြစ်သည်။ လက်တွေ့ဘဝတွင် သင်သည် နံပါတ်များ စာသားမတိုင်မီ၊ စာသားပြီးနောက် သို့မဟုတ် စာသားကြားတွင် ကိန်းဂဏာန်းများပါသည့် တူညီသောဒေတာနှင့် ကိုင်တွယ်ဖြေရှင်းနိုင်ခြေများပါသည်။ အောက်ပါနမူနာများသည် ဤကိစ္စအတွက် အဖြေအတိအကျကို ပေးစွမ်းပါသည်။

စာသားကို ဖယ်ရှားပြီး Excel ဆဲလ်များတွင် နံပါတ်များကို ထားရှိနည်း

ဖြေရှင်းချက်သည် Excel 365၊ Excel 2021 တွင် အလုပ်လုပ်သည် နှင့် Excel 2019

Microsoft Excel 2019 သည် အစောပိုင်းဗားရှင်းများတွင် မရရှိနိုင်သော လုပ်ဆောင်ချက်အသစ်အချို့ကို မိတ်ဆက်ပေးခဲ့ပြီး၊ ဆဲလ်တစ်ခုမှ စာသားအက္ခရာများကို ဖယ်ရှားရန်အတွက် TEXTJOIN ဟုအမည်ရသည့် အဆိုပါလုပ်ဆောင်ချက်များကို ကျွန်ုပ်တို့အသုံးပြုသွားမည်ဖြစ်ပါသည်။ နံပါတ်များ ပါဝင်ပါသည်။

ယေဘုယျဖော်မြူလာမှာ-

TEXTJOIN("", TRUE, IFERROR(MID( cell, ROW(INDIRECT( "1:"&LEN(<1)">cell))), 1) *1, ""))

Excel 365 နှင့် 2021 တွင်၊ ဤတစ်ခုလည်း အလုပ်လုပ်ပါမည်-

TEXTJOIN("", TRUE၊IFERROR(MID( ဆဲလ်၊ SEQUENCE(LEN( ဆဲလ်)))၊ 1) *1၊ ""))

မြင်မြင်ချင်းတွင် ဖော်မြူလာများသည် အနည်းငယ် ထိတ်လန့်နေပုံရပေသည်၊ ဒါပေမယ့် သူတို့အလုပ်လုပ်တယ် :)

ဥပမာ၊ A2 ရှိ နံပါတ်များမှ စာသားကို ဖယ်ရှားရန်၊ B2 တွင် အောက်ပါဖော်မြူလာများထဲမှ တစ်ခုကို ထည့်ပါ၊ ထို့နောက် လိုအပ်သလောက် ဆဲလ်များစွာသို့ ကူးယူပါ။

Excel 365 - 2019 တွင်-

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

Excel 2019 တွင်၊ ၎င်းကို Ctrl + Shift + Enter ဖြင့် array ဖော်မြူလာအဖြစ် ထည့်သွင်းရပါမည်။ dynamic array Excel တွင်၊ ၎င်းသည် Enter သော့ဖြင့် ဖြည့်စွက်ထားသော ပုံမှန်ဖော်မြူလာတစ်ခုအဖြစ် အလုပ်လုပ်ပါသည်။

Excel 365 နှင့် 2021 တွင်-

=TEXTJOIN("", TRUE, IFERROR(MID(A2, SEQUENCE(LEN(A2)), 1) *1, ""))

ရလဒ်အနေဖြင့် စာသားအက္ခရာအားလုံးသည် ဆဲလ်တစ်ခုမှ ဖယ်ရှားပြီး နံပါတ်များကို သိမ်းဆည်းထားပါသည်-

ဤဖော်မြူလာ အလုပ်လုပ်ပုံ-

ယုတ္တိဗေဒကို ပိုမိုနားလည်ရန်၊ စတင်စုံစမ်းကြည့်ကြပါစို့။ အတွင်းမှဖော်မြူလာ-

သင်သည် ROW(INDIRECT("1:"&LEN(string))) သို့မဟုတ် SEQUENCE(LEN(string))) နှစ်ခုစလုံးကို အသုံးပြု၍ စုစုပေါင်းအရေအတွက်နှင့် သက်ဆိုင်သည့် နံပါတ်များကို ဆက်တိုက်ဖန်တီးရန်၊ ရင်းမြစ်စာကြောင်းရှိ အက္ခရာများ၏ နံပါတ်များကို နံပါတ်များအဖြစ် MID လုပ်ဆောင်ချက်သို့ ဖြည့်သွင်းပါ။ B2 တွင်၊ ဤပုံသေနည်း၏ ဤအပိုင်းသည် အောက်ပါအတိုင်းဖြစ်သည်-

MID(A2, {1;2;3;4;5;6;7;8;9;10;11;12;13;14;15}, 1)

MID လုပ်ဆောင်ချက်သည် ပထမတစ်ခုမှအစ A2 မှ ဇာတ်ကောင်တစ်ခုစီကို ထုတ်ယူပြီး ၎င်းတို့အား array တစ်ခုအဖြစ် ပြန်ပေးသည်-

{"2";"1";"0";" ";"S";"u";"n";"s";"e";"t";" ";"R";"o";"a";"d"}

ဤအခင်းအကျင်းကို 1 ဖြင့် မြှောက်ထားသည်။ ဂဏန်းတန်ဖိုးများသည် ပြောင်းလဲမှုမရှိဘဲ ရှင်သန်နေကာ ဂဏန်းမဟုတ်သော စာလုံးတစ်လုံးကို မြှောက်ခြင်းဖြင့် #VALUE ရလဒ်များထွက်ပေါ်လာသည်။ အမှား-

{2;1;0;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!}

IFERROR လုပ်ဆောင်ချက်ကို ကိုင်တွယ်သည်။ဤအမှားများကို ဗလာစာကြောင်းများဖြင့် အစားထိုးသည်-

{2;1;0;"";"";"";"";"";"";"";"";"";"";"";""}

ဤနောက်ဆုံးအခင်းအကျင်းကို TEXTJOIN လုပ်ဆောင်ချက်တွင် ဆောင်ရွက်ပေးသည်၊၊ ခင်းကျင်းရှိ ဗလာမဟုတ်သောတန်ဖိုးများကို ပေါင်းစပ်ပေးသည့် ( ignore_empty ) အဆုံးအဖြတ်အတွက် အလွတ်စာကြောင်း ("") ကို အသုံးပြု၍ အငြင်းအခုံကို TRUE ဟု သတ်မှတ်ထားသည်-

TEXTJOIN("", TRUE, {2;1;0;"";"";"";"";"";"";"";"";"";"";"";""})

အကြံပြုချက်။ Excel 2016 - 2007 အတွက်၊ အဖြေတစ်ခုလည်းရှိပါသည်၊ သို့သော် ပုံသေနည်းသည် ပို၍ရှုပ်ထွေးပါသည်။ ဤသင်ခန်းစာတွင် ၎င်းကိုတွေ့နိုင်သည်- Excel တွင် နံပါတ်များကို ထုတ်ယူနည်း။

နံပါတ်များမှ စာသားများကို ဖယ်ရှားရန် စိတ်ကြိုက်လုပ်ဆောင်ချက်

ဖြေရှင်းချက်သည် Excel ဗားရှင်းအားလုံးအတွက် အလုပ်လုပ်သည်

Excel ဗားရှင်းအဟောင်းကို အသုံးပြုနေပါက သို့မဟုတ် အထက်ပါ ဖော်မြူလာများကိုလည်း ရှာတွေ့နိုင်ပါသည်။ မှတ်မိရန်ခက်ခဲသည်၊ RemoveText ကဲ့သို့သော ရိုးရှင်းသော အထားအသိုနှင့် အသုံးပြုရလွယ်ကူသော အမည်ဖြင့် သင့်ကိုယ်ပိုင်လုပ်ဆောင်ချက်ကို ဖန်တီးခြင်းမှ မည်သည့်အရာကမှ သင့်ကို တားဆီးနိုင်မည်မဟုတ်ပေ။ အသုံးပြုသူသတ်မှတ်ထားသော လုပ်ဆောင်ချက် (UDF) ကို ပုံစံနှစ်မျိုးဖြင့် ရေးသားနိုင်သည်-

VBA ကုဒ် 1:

ဤနေရာတွင်၊ ကျွန်ုပ်တို့သည် အရင်းအမြစ်စာတန်းရှိ ဇာတ်ကောင်တစ်ခုစီကို တစ်ခုချင်းစီ ကြည့်သည်။ တစ်လုံးနှင့် ဂဏန်းဟုတ်မဟုတ် စစ်ဆေးပါ။ နံပါတ်တစ်ခုဆိုလျှင်၊ ဇာတ်ကောင်ကို ရလာဒ်စာတန်းသို့ ပေါင်းထည့်သည်။

လုပ်ဆောင်ချက် RemoveText(str As String) Dim sRes As String sRes = "" For i = 1 To Len(str) မှန်လျှင် = IsNumeric(Mid(str၊ i 1)) ထို့နောက် sRes = sRes & Mid(str, i, 1) End if Next i RemoveText = sRes End Function

VBA ကုဒ် 2:

ကုဒ်သည် ပုံမှန်အသုံးအနှုန်းတစ်ခုကို လုပ်ဆောင်ရန် အရာဝတ္တုတစ်ခုကို ဖန်တီးပေးပါသည်။ RegExp ကိုအသုံးပြု၍ အရင်းအမြစ်စာကြောင်းမှ ဂဏန်း 0-9 မှလွဲ၍ အခြားစာလုံးအားလုံးကို ဖယ်ရှားပါသည်။

Function RemoveText(str As String ) As String with CreateObject ( "VBScript.RegExp" ) .Global = True .Pattern = "[^0-9]" RemoveText = .Replace(str, "" ) End Function

အလုပ်စာရွက်ငယ်များတွင်၊ ကုဒ်နှစ်ခုစလုံးသည် အညီအမျှ ကောင်းမွန်စွာ လုပ်ဆောင်နိုင်မည်ဖြစ်သည်။ လုပ်ဆောင်ချက်ကို အကြိမ်ရာနှင့်ချီ သို့မဟုတ် ထောင်နှင့်ချီ၍ ခေါ်သည့် ကြီးမားသော အလုပ်စာရွက်များတွင် VBScript.RegExp ကို အသုံးပြုသည့် ကုဒ် 2 သည် ပိုမိုမြန်ဆန်စွာ အလုပ်လုပ်မည်ဖြစ်သည်။

သင့်အလုပ်စာအုပ်တွင် ကုဒ်ထည့်သွင်းရန် အသေးစိတ်အဆင့်များကို ဤနေရာတွင် တွေ့နိုင်သည်- VBA ထည့်သွင်းနည်း Excel ရှိ ကုဒ်။

သင်ရွေးချယ်သည့် မည်သည့်နည်းဖြင့်မဆို၊ အသုံးပြုသူ ရှုထောင့်မှ စာသားများကို ဖျက်ရန်နှင့် နံပါတ်များကို ချန်ထားရန် လုပ်ဆောင်ချက်သည် ဤကဲ့သို့ ရိုးရှင်းပါသည်-

RemoveText(string)

ဥပမာ၊ ဆဲလ် A2 မှ ဂဏန်းမဟုတ်သော အက္ခရာများကို ဖယ်ရှားပါ၊ B2 ရှိ ဖော်မြူလာမှာ-

=RemoveText(A2)

၎င်းကို ကော်လံအောက်သို့ ကူးယူလိုက်ရုံဖြင့် ဤရလဒ်ကို ရရှိပါမည်-

မှတ်ချက်။ မူရင်းဖော်မြူလာများနှင့် စိတ်ကြိုက်လုပ်ဆောင်မှုနှစ်ခုလုံးသည် numeric string ကို ထုတ်ပေးသည်။ ၎င်းကို ဂဏန်းအဖြစ်ပြောင်းရန်၊ ရလဒ်ကို 1 ဖြင့် မြှောက်ပါ၊ သို့မဟုတ် သုညထည့်ပါ၊ သို့မဟုတ် VALUE လုပ်ဆောင်ချက်တွင် ဖော်မြူလာကို ခြုံပါ။ ဥပမာ-

=RemoveText(A2) + 0

=VALUE(RemoveText(A2))

Excel ရှိ စာသားစာကြောင်းမှ နံပါတ်များကို ဖယ်ရှားနည်း

ဖြေရှင်းချက် Excel 365၊ Excel 2021 နှင့် Excel တို့တွင် အလုပ်လုပ်သည် 2019

အက္ခရာဂဏန်းစာကြောင်းမှ နံပါတ်များကို ဖယ်ရှားရန် ဖော်မြူလာများသည် ယခင်နမူနာတွင် ဆွေးနွေးထားသည့်များနှင့် အတော်လေး ဆင်တူပါသည်။

Excel 365 - 2019:

TEXTJOIN(" "၊ အမှန်၊ IF(ISERR(MID( ဆဲလ် )၊ ROW(INDIRECT("1:"&LEN( ဆဲလ် ) )), 1) *1), MID( ဆဲလ် , ROW(INDIRECT("1:"&LEN( ) cell ))), 1), ""))

Excel 2019 တွင်၊ Ctrl + Shift + Enter ကီးများကို တွဲနှိပ်ခြင်းဖြင့် ၎င်းကို array formula အဖြစ် ပြုလုပ်ရန် မမေ့ပါနှင့်။

Excel 365 နှင့် 2021 အတွက်:

TEXTJOIN("", TRUE, IF(ISERROR(MID( ဆဲလ် )၊ SEQUENCE(LEN( ဆဲလ် 1)) *1), MID ( ဆဲလ် ၊ SEQUENCE(LEN( ဆဲလ် )), 1), ""))

ဥပမာ၊ A2 ရှိ စာကြောင်းတစ်ခုမှ နံပါတ်များကို ဖယ်ရှားရန် ဖော်မြူလာမှာ-

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

သို့မဟုတ်

=TEXTJOIN("", TRUE, IF(ISERROR(MID(A2, SEQUENCE(LEN(A2)), 1) *1), MID(A2, SEQUENCE(LEN(A2)), 1), ""))

ရလဒ်အနေဖြင့်၊ နံပါတ်များအားလုံးကိုဆဲလ်တစ်ခုမှဖယ်ရှားပြီး စာသားအက္ခရာများကို သိမ်းဆည်းထားပါသည်-

အထက် screenshot တွင်ပြထားသည့်အတိုင်း၊ ဖော်မြူလာသည် string တစ်ခုရှိ မည်သည့်နေရာမှမဆို ဂဏန်းအက္ခရာများကို ဖယ်ရှားသည်- အစ၊ အဆုံးနှင့် အလယ်တွင်။ သို့သော်၊ သတိပေးချက်တစ်ခုရှိသည်- string တစ်ခုလျှင် နေရာလွတ်တစ်ခု၏နောက်တွင် နံပါတ်တစ်ခုဖြင့်စတင်သည် ၊ ထိုနေရာလွတ်ကို ဆက်လက်ထိန်းသိမ်းထားသည်၊ ၎င်းသည် ဦးဆောင်နေရာလွတ်များ (B2 ကဲ့သို့) ပြဿနာကိုဖြစ်ပေါ်စေသည်။

စာသားမတိုင်မီ နေရာလွတ်များကို ဖယ်ရှားရန်၊ ၊ ဤကဲ့သို့သော TRIM လုပ်ဆောင်ချက်တွင် ဖော်မြူလာကို ခြုံကြည့်ပါ-

=TRIM(TEXTJOIN("", TRUE, IF(ISERROR(MID(A2, SEQUENCE(LEN(A2)), 1) *1), MID(A2, SEQUENCE(LEN(A2)), 1), "")))

ယခု၊ သင့်ရလဒ်များသည် လုံးဝပြီးပြည့်စုံပါသည်။

ဤဖော်မြူလာအလုပ်လုပ်ပုံ-

အနှစ်သာရအားဖြင့်၊ ဖော်မြူလာသည် ယခင်ဥပမာတွင် ရှင်းပြထားသည့်အတိုင်း အလုပ်လုပ်သည်။ ကွာခြားချက်မှာ၊ နောက်ဆုံးအခင်းအကျင်းမှ TEXTJOIN လုပ်ဆောင်ချက်အထိ၊ သင်သည် နံပါတ်များကို စာသားမဟုတ်ဘဲ ဖယ်ရှားရန် လိုအပ်ပါသည်။ ၎င်းကိုလုပ်ဆောင်ရန်၊ ကျွန်ုပ်တို့သည် IF နှင့် ISERROR လုပ်ဆောင်ချက်များကို ပေါင်းစပ်အသုံးပြုပါသည်။

သင်မှတ်မိသလောက်၊MID(…)+0 သည် နံပါတ်များနှင့် #VALUE ကို ထုတ်ပေးသည်။ တူညီသော ရာထူးများတွင် စာသားအက္ခရာများကို ကိုယ်စားပြုသည့် အမှားများ-

{2;1;0;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!;#VALUE!}

ISERROR လုပ်ဆောင်ချက်သည် အမှားများကို ဖမ်းယူပြီး ထွက်ပေါ်လာသော ဘူလီယံတန်ဖိုးများကို IF-

{FALSE;FALSE;FALSE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE;TRUE}

IF လုပ်ဆောင်ချက်သည် TRUE (အမှားတစ်ခု) ကိုမြင်သောအခါ၊ ၎င်းသည် အခြား MID လုပ်ဆောင်ချက်၏အကူအညီဖြင့် လုပ်ဆောင်ပြီးသည့် ခင်းကျင်းထဲသို့ သက်ဆိုင်ရာ စာသားဇာတ်ကောင်ကို ထည့်သွင်းသည်။ IF လုပ်ဆောင်ချက်သည် FALSE (နံပါတ်တစ်ခု) ကိုမြင်သောအခါ၊ ၎င်းကို အလွတ်စာကြောင်းတစ်ခုဖြင့် အစားထိုးသည်-

{"";"";"";" ";"S";"u";"n";"s";"e";"t";" ";"R";"o";"a";"d"}

ဤနောက်ဆုံးအခင်းအကျင်းကို TEXTJOIN သို့ ကူးသွားသောကြောင့် ၎င်းသည် စာသားအက္ခရာများကို ပေါင်းစပ်ပြီး ထုတ်ပေးသည်။ ရလဒ်။

စာသားမှ နံပါတ်များကို ဖယ်ရှားရန် စိတ်ကြိုက်လုပ်ဆောင်မှု

ဖြေရှင်းချက်သည် Excel ဗားရှင်းအားလုံးအတွက် အလုပ်လုပ်သည်

ခိုင်ခံ့သော ဖော်မြူလာကို သိမ်းဆည်းထားသင့်သည်ကို သတိရပါ။ ရိုးရှင်းသည်၊ ကျွန်ုပ်သည် အသုံးပြုသူသတ်မှတ်ထားသော လုပ်ဆောင်ချက် (UDF) ၏ ကုဒ်ကို မျှဝေလိုက်ပါမည်။

VBA ကုဒ် 1:

Function RemoveNumbers(str As String) Dim sRes As String sRes = "" For i = 1 To Len(str) အကယ်၍ False = IsNumeric(Mid(str, i, 1)) ထို့နောက် sRes = sRes & Mid(str, i, 1) အဆုံးသတ်ပါက နောက်တစ်ခု i RemoveNumbers = sRes End Function

VBA ကုဒ် 2:

Function RemoveNumbers(str As String) အဖြစ် CreateObject ("VBScript.RegExp" ) .Global = True .Pattern = "[0-9]" RemoveNumbers2 = .Replace(str, "" ) End With End Function

RemoveText လုပ်ဆောင်ချက်ကဲ့သို့ပင်၊ ဒုတိယကုဒ်ကို အသုံးပြုရန် ပိုကောင်းပါသည်။ ကြီးမားသောစွမ်းဆောင်ရည်ကို ပိုကောင်းအောင် လုပ်ဆောင်ရန် အလုပ်စာရွက်များ။

ကုဒ်ကို သင့်အလုပ်စာအုပ်တွင် ထည့်သွင်းပြီးသည်နှင့်၊ သင်သည် ဤစိတ်ကြိုက်လုပ်ဆောင်ချက်ကို အသုံးပြု၍ ဆဲလ်တစ်ခုမှ ဂဏန်းအက္ခရာအားလုံးကို ဖယ်ရှားနိုင်သည်-

RemoveNumbers(string)

ကျွန်ုပ်တို့၏ ကိစ္စတွင်၊ B2 ရှိ ဖော်မြူလာမှာ-

=RemoveNumbers(A2)

ရှိပါက ဦးဆောင်နေရာလွတ်များကို ချုံ့ရန်၊ သင်မူရင်းဖော်မြူလာကဲ့သို့ TRIM အတွင်းရှိ စိတ်ကြိုက်လုပ်ဆောင်ချက်ကို အသိုက်ဖွဲ့လိုက်ပါ-

=TRIM(RemoveNumbers(A2))

နံပါတ်များနှင့် စာသားများကို သီးခြားကော်လံများအဖြစ် ခွဲပါ

သင်သည် စာသားနှင့် နံပါတ်များကို ကော်လံနှစ်ခုသို့ ခွဲလိုသောအခါတွင်၊ ဖော်မြူလာတစ်ခုတည်းဖြင့် အလုပ်ကို ပြီးမြောက်စေသည်မှာ ကောင်းပါတယ်။ သဘောတူလား? ယင်းအတွက်၊ ကျွန်ုပ်တို့သည် RemoveText နှင့် RemoveNumbers လုပ်ဆောင်ချက်များ၏ ကုဒ်ကို SplitTextNumbers ဟု အမည်ပေးထားသော လုပ်ဆောင်ချက်တစ်ခုသို့ ပေါင်းစပ်လိုက်ရုံသာ၊ သို့မဟုတ် ရိုးရိုး Split ၊ သို့မဟုတ် သင်ကြိုက်နှစ်သက်သမျှ :)

VBA ကုဒ် 1:

Function SplitTextNumbers(str As String , is_remove_text As Boolean ) As String Dim sNum, sText, sChar As String sCurChar = sNum = sText = "" For i = 1 To Len(str) sCurChar = Mid(str, i, 1) True = IsNumeric(sCurChar) ထို့နောက် sNum = sNum & sCurChar အခြား sText = sText & sCurChar End If Next i If True = is_remove_text ထို့နောက် SplitTextNumbers = sNum Else SplitTextNumbers = sText End If End Function

VBA code 2:

Function SplitTextNumbers(str As String , is_remove_text) CreateObject ("VBScript.RegExp" ဖြင့်) .Global = True If True = is_remove_text ထို့နောက် .Pattern = "[^0-9]" အခြား.pattern = "[0-9]" End If SplitTextNumbers = .Replace(str, "") End With End Function

ကျွန်ုပ်တို့၏စိတ်ကြိုက်လုပ်ဆောင်ချက်အသစ်တွင် အကြောင်းပြချက်နှစ်ခု လိုအပ်သည်-

SplitTextNumbers(string, is_remove_text)

ဘယ်မှာ is_remove_text သည် မည်သည့်အက္ခရာများကို ဖယ်ရှားရမည်ကို ညွှန်ပြသော Boolean တန်ဖိုးဖြစ်သည်-

• TRUE သို့မဟုတ် 1 - စာသားကိုဖယ်ရှားပြီး နံပါတ်များကိုသိမ်းဆည်းထားပါ
• FALSE သို့မဟုတ် 0 - နံပါတ်များကိုဖယ်ရှားပြီး စာသားကိုသိမ်းဆည်းပါ။

ကျွန်ုပ်တို့၏နမူနာဒေတာအတွဲအတွက်၊ ဖော်မြူလာများသည် ဤပုံစံကိုယူသည်-

ဂဏန်းမဟုတ်သောအက္ခရာများကိုဖယ်ရှားရန်-

=SplitTextNumbers(A2, TRUE)

ဂဏန်းအက္ခရာများကိုဖျက်ရန် :

=SplitTextNumbers(A2, FALSE)

အကြံပြုချက်။ ဦးဆောင်နေရာလပ်များ၏ ဖြစ်နိုင်ခြေပြဿနာကို ရှောင်ရှားရန်၊ TRIM လုပ်ဆောင်ချက်ရှိ နံပါတ်များကို ဖယ်ရှားသည့် ဖော်မြူလာကို အမြဲတမ်း ထုပ်ပိုးရန် အကြံပြုပါသည်-

=TRIM(SplitTextNumbers(A2, FALSE))

နံပါတ်များ သို့မဟုတ် စာသားများကို ဖယ်ရှားရန် အထူးတူးလ်

ပြုလုပ်သူများအတွက် မလိုအပ်ဘဲ ရှုပ်ထွေးနေသည့်အရာများကို မကြိုက်ပါ၊ Excel တွင် စာသား သို့မဟုတ် နံပါတ်များကို ဖယ်ရှားနည်း ကျွန်ုပ်တို့၏ကိုယ်ပိုင်နည်းလမ်းကို ကျွန်ုပ်ပြပါမည်။

ကျွန်ုပ်တို့၏ Ultimate Suite ကို သင်၏ Excel ribbon တွင် ထည့်သွင်းထားသည်ဟု ယူဆပါက၊ သင်ပြုလုပ်သည့်အရာမှာ အောက်ပါအတိုင်းဖြစ်သည်-

1. Ablebits Data tab တွင်၊ Text group တွင်၊ Remove > Characters Remove ကိုနှိပ်ပါ။

add-in ၏အကန့်တွင်၊ အရင်းအမြစ်အပိုင်းအခြားကိုရွေးချယ်ပါ၊ ဇာတ်ကောင်အစုံများကိုဖယ်ရှားပါ ရွေးစရာကိုရွေးချယ်ပြီး စာသား <1 တစ်ခုခုကို ရွေးပါ drop-down list ရှိ>ဇာတ်ကောင် သို့မဟုတ် ဂဏန်းများ အက္ခရာများ ။

Remove ကိုနှိပ်ပြီး ရလဒ်ကိုခံစားကြည့်ပါ :)

အကြံပြုချက်။ ရလဒ်များတွင် ဦးဆောင်နေရာများ ပါဝင်ပါက၊ Trim Spaces များကိရိယာသည် အချိန်တိုအတွင်း ၎င်းတို့ကို ဖယ်ရှားပေးလိမ့်မည်။

၎င်းသည် Excel ရှိ စာကြောင်းတစ်ခုမှ စာသား သို့မဟုတ် ဂဏန်းအက္ခရာများကို ဖယ်ရှားနည်းဖြစ်သည်။ ကျွန်ုပ်တို့၏ဘလော့ဂ်တွင် ဖတ်ရှုပြီး နောက်အပတ်တွင် သင့်ကိုတွေ့ရန် မျှော်လင့်သည့်အတွက် ကျေးဇူးတင်ပါသည်။

ရရှိနိုင်သော ဒေါင်းလုဒ်များ

Excel ရှိ စာသား သို့မဟုတ် နံပါတ်များကို ဖယ်ရှားပါ - ဥပမာ (.xlsm ဖိုင်)

Ultimate Suite - အစမ်းဗားရှင်း (.exe ဖိုင်)