Vba- စာကြောင်းတစ်ခုမှ နောက်ဆုံးစာလုံးကို ဖယ်ရှားနည်း
VBA ကိုသုံးပြီး string တစ်ခုမှ နောက်ဆုံးစာလုံးကို ဖယ်ရှားရန် အောက်ပါ အခြေခံ အထားအသိုကို အသုံးပြုနိုင်သည်။
Sub RemoveLastChar()
Dim i As Integer
Dim myString As String
For i = 2 To 11
myString = Range(" A " & i)
Range(" B " & i) = Left(myString, Len(myString) - 1)
Next i
End Sub
ဤဥပမာသည် A2:A11 အကွာအဝေးရှိ စာကြောင်းတစ်ခုစီမှ နောက်ဆုံးစာလုံးကို ဖယ်ရှားပြီး အပိုင်းအခြား B2:B11 တွင် ရလဒ်များကို ပြသသည်။
အောက်ဖော်ပြပါ ဥပမာသည် ဤ syntax ကို လက်တွေ့တွင် မည်သို့အသုံးပြုရမည်ကို ပြသထားသည်။
ဥပမာ- Strings မှနောက်ဆုံးဇာတ်ကောင်ကိုဖယ်ရှားရန် VBA ကိုအသုံးပြုခြင်း။
Excel တွင် အောက်ဖော်ပြပါ ဘတ်စကတ်ဘောအသင်းအမည်များ ရှိသည်ဆိုပါစို့။

အဖွဲ့အမည်တစ်ခုစီမှ နောက်ဆုံးဇာတ်ကောင်ကို ဖယ်ရှားလိုသည်ဆိုပါစို့။
ဒါကိုလုပ်ဖို့ အောက်ပါ macro ကို ဖန်တီးနိုင်ပါတယ်။
Sub RemoveLastChar()
Dim i As Integer
Dim myString As String
For i = 2 To 11
myString = Range(" A " & i)
Range(" B " & i) = Left(myString, Len(myString) - 1)
Next i
End Sub
ကျွန်ုပ်တို့ ဤ macro ကို run သောအခါတွင်၊ ကျွန်ုပ်တို့သည် အောက်ပါ output ကို ရရှိသည် ။

ကော်လံ B သည် ကော်လံ A ရှိ ကြိုးတစ်ချောင်းစီကို နောက်ဆုံးစာလုံးဖယ်ရှားပြီးဖြစ်သည်။
အကယ်၍ သင်သည် စာကြောင်းတစ်ခုမှ နောက်ဆုံး n အက္ခရာများကို ဖယ်ရှားလိုပါက၊ Left method ရှိ 1 ကို အခြားနံပါတ်တစ်ခုဖြင့် အစားထိုးလိုက်ပါ။
ဥပမာအားဖြင့်၊ string တစ်ခုမှ နောက်ဆုံးစာလုံး 2 လုံးကို ဖယ်ရှားရန် အောက်ပါ macro ကို ဖန်တီးနိုင်သည်-
Sub RemoveLastTwoChar()
Dim i As Integer
Dim myString As String
For i = 2 To 11
myString = Range(" A " & i)
Range(" B " & i) = Left(myString, Len(myString) - 2)
Next i
End Sub
ကျွန်ုပ်တို့ ဤ macro ကို run သောအခါတွင်၊ ကျွန်ုပ်တို့သည် အောက်ပါ output ကို ရရှိသည် ။

ကော်လံ B သည် နောက်ဆုံးစာလုံးနှစ်လုံးကို ဖယ်ရှားပြီး ကော်လံ A ရှိ စာကြောင်းတစ်ခုစီကို ပြသသည်။
မှတ်ချက် – VBA Left နည်းလမ်းအတွက် စာရွက်စာတမ်းအပြည့်အစုံကို ဤနေရာတွင် ရှာနိုင်သည်။
ထပ်လောင်းအရင်းအမြစ်များ
အောက်ဖော်ပြပါ သင်ခန်းစာများသည် VBA ကို အသုံးပြု၍ အခြားဘုံအလုပ်များကို မည်သို့လုပ်ဆောင်ရမည်ကို ရှင်းပြသည်-
VBA- စာကြောင်းတစ်ခုရှိ ဇာတ်ကောင်များ၏ ဖြစ်ပေါ်မှုကို ရေတွက်နည်း
VBA- စာကြောင်းတစ်ကြောင်းတွင် အခြားစာကြောင်းပါရှိမရှိ စစ်ဆေးနည်း
VBA- သီးခြားစာသားဖြင့် ဆဲလ်များကို ရေတွက်နည်း