Vba- ရှေ့ဆောင်နှင့် နောက်လိုက်နေရာများကို ဖယ်ရှားနည်း

VBA ကိုသုံးပြီး strings များမှ ဦးဆောင်ခြင်းနှင့် နောက်လိုက်နေရာလွတ်များကို ဖယ်ရှားရန် အောက်ပါအခြေခံ syntax ကို သင်အသုံးပြုနိုင်သည်-

 Sub RemoveLeadingTrailingSpaces()

    Dim i As Integer

    For i = 2 To 7
    Range(" B " & i) = Trim(Range(" A " & i))
    Next i
    
End Sub

ဤဥပမာသည် အကွာအဝေး A2:A7 ရှိ စာကြောင်းတစ်ခုစီမှ ရှေ့ဆောင်နှင့် နောက်လိုက်နေရာများကို ဖယ်ရှားပြီး အပိုင်းအခြား B2:B7 တွင် ရလဒ်များကို ထုတ်ပေးသည်။

အောက်ဖော်ပြပါ ဥပမာသည် ဤ syntax ကို လက်တွေ့တွင် မည်သို့အသုံးပြုရမည်ကို ပြသထားသည်။

ဥပမာ- စာကြောင်းများမှ ဦးဆောင်ခြင်းနှင့် နောက်လိုက်နေရာများကို ဖယ်ရှားရန် VBA ကို အသုံးပြုခြင်း။

ကျွန်ုပ်တို့တွင် Excel တွင် အောက်ပါစာကြောင်းများစာရင်းရှိသည်ဆိုပါစို့။

စာကြောင်းများစွာတွင် ရှေ့ သို့မဟုတ် နောက်လိုက်နေရာများပါရှိကြောင်း သတိပြုပါ။

ကျွန်ုပ်တို့သည် စာကြောင်းတစ်ခုစီမှ ဦးဆောင်ခြင်းနှင့် နောက်လိုက်နေရာများကို ဖယ်ရှားလိုသည်ဆိုပါစို့။

ဒါကိုလုပ်ဖို့ အောက်ပါ macro ကို ဖန်တီးနိုင်ပါတယ်။

 Sub RemoveLeadingTrailingSpaces()

    Dim i As Integer

    For i = 2 To 7
    Range(" B " & i) = Trim(Range(" A " & i))
    Next i
    
End Sub

ကျွန်ုပ်တို့ ဤ macro ကို run သောအခါတွင်၊ ကျွန်ုပ်တို့သည် အောက်ပါ output ကို ရရှိသည် ။

ကော်လံ B သည် ကော်လံ A ရှိ ကြိုးတစ်ချောင်းစီကို ဦးဆောင်ပြီး နောက်လိုက်နေရာလွတ်များကို ဖယ်ရှားပေးပါသည်။

စာကြောင်းများမှ ဦးဆောင်နေသော သို့မဟုတ် နောက်လိုက်နေရာများကိုသာ ဖယ်ရှားလိုပါက LTrim သို့မဟုတ် RTRim လုပ်ဆောင်ချက်များကို အသီးသီး အသုံးပြုနိုင်ကြောင်း သတိပြုပါ။

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

ထပ်လောင်းအရင်းအမြစ်များ

အောက်ဖော်ပြပါ သင်ခန်းစာများသည် VBA ကို အသုံးပြု၍ အခြားဘုံအလုပ်များကို မည်သို့လုပ်ဆောင်ရမည်ကို ရှင်းပြသည်-

VBA- စာကြောင်းတစ်ခုရှိ ဇာတ်ကောင်များ၏ ဖြစ်ပေါ်မှုကို ရေတွက်နည်း
VBA- စာကြောင်းတစ်ကြောင်းတွင် အခြားစာကြောင်းပါရှိမရှိ စစ်ဆေးနည်း
VBA- သီးခြားစာသားဖြင့် ဆဲလ်များကို ရေတွက်နည်း