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

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

 Sub RemoveBorders()
Range(" A1:B12 ").Borders.LineStyle = xlNone
End Sub

ဤဥပမာသည် A1:B12 အကွာအဝေးရှိ ဆဲလ်များမှ နယ်နိမိတ်အားလုံးကို ဖယ်ရှားသည်။

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

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

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

A1:B12 အကွာအဝေးရှိ ဆဲလ်တစ်ခုစီမှ ဘောင်များကို ဖယ်ရှားလိုသည်ဟု ဆိုကြပါစို့။

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

 Sub RemoveBorders()
Range(" A1:B12 ").Borders.LineStyle = xlNone
End Sub

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

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

မတူညီသောအကွာအဝေးရှိ ဆဲလ်များမှ ဘောင်များကို ဖယ်ရှားရန် A1:B12 ကို မက်ခရိုရှိ မတူညီသည့်အကွာအဝေးဖြင့် အစားထိုးပါ။

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

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

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

VBA- အလုပ်စာအုပ်တွင် စာရွက်အရေအတွက်ကို ရေတွက်နည်း
VBA- အပိုင်းအခြားရှိ အတန်းအရေအတွက်ကို ရေတွက်နည်း
VBA- နောက်ဆုံးသုံးထားသောစာကြောင်းကို ဘယ်လိုရှာမလဲ။