Vba- ဒေတာပါရှိသော ဆဲလ်အားလုံးကို ဘယ်လိုရွေးချယ်မလဲ။
စာရွက်တစ်ခုရှိ ဒေတာပါရှိသော ဆဲလ်အားလုံးကို ရွေးချယ်ရန် VBA တွင် အောက်ပါနည်းလမ်းများကို သင်အသုံးပြုနိုင်သည်-
နည်းလမ်း 1- ဒေတာပါရှိသော ဆဲလ်ဂရစ်တစ်ခုကို ရွေးပါ။
SubSelectCellsWithData ()
Range(" A1 ").CurrentRegion.Select
End Sub
ဤအထူးမက်ခရိုသည် လက်ရှိအသုံးပြုနေသောစာရွက်၏ဆဲလ် A1 မှစတင်သည့်ဒေတာပါရှိသောဆဲလ်များ၏ဇယားကွက်တစ်ခုကိုရွေးချယ်မည်ဖြစ်သည်။
နည်းလမ်း 2- ဒေတာပါရှိသော ဆဲလ်တစ်ခုစီကို ရွေးပါ။
SubSelectCellsWithData ()
Worksheets(" Sheet1 ").Activate
ActiveSheet.Cells.SpecialCells(xlCellTypeConstants).Activate
End Sub
ဤအထူးမက်ခရိုသည် Sheet1 မှဒေတာများပါရှိသော ဆဲလ်တစ်ခုချင်းစီအားလုံးကို ရွေးချယ်မည်ဖြစ်သည်။
အောက်ပါနမူနာများသည် Excel in Sheet1 ဟုခေါ်သော အောက်ပါစာရွက်ဖြင့် လက်တွေ့တွင် နည်းလမ်းတစ်ခုစီကို အသုံးပြုနည်းကို ပြသသည် ။

ဥပမာ 1- ဒေတာပါသော ဆဲလ်ဂရစ်တစ်ခုကို ရွေးပါ။
Sheet1 တွင်ဒေတာပါရှိသောဆဲလ်ဂရစ်ကိုကျွန်ုပ်တို့ရွေးချယ်လိုသည်ဆိုပါစို့။
ဒါကိုလုပ်ဖို့ အောက်ပါ macro ကို ဖန်တီးနိုင်ပါတယ်။
SubSelectCellsWithData ()
Range(" A1 ").CurrentRegion.Select
End Sub
ဤမက်ခရိုကို ကျွန်ုပ်တို့ လုပ်ဆောင်သောအခါ၊ Sheet1 တွင် ဒေတာပါရှိသော ဆဲလ်ဂရစ်တစ်ခုလုံးကို ရွေးချယ်ထားသည်ကို တွေ့နိုင်သည်-

ဤနည်းလမ်းသည် ဆဲလ်အလွတ်များဖြင့် ဝန်းရံထားသော ဆဲလ်အကွာအဝေးကို ရွေးချယ်ရန် CurrentRegion ပိုင်ဆိုင်မှုကို အသုံးပြုကြောင်း သတိပြုပါ။
CurrentRegion ပိုင်ဆိုင်မှုအတွက် စာရွက်စာတမ်းအပြည့်အစုံကို ဤနေရာတွင် ရှာဖွေနိုင်ပါသည်။
ဥပမာ 2- ဒေတာပါရှိသော ဆဲလ်တစ်ခုစီကို ရွေးပါ။
Sheet1 တွင် ဒေတာပါရှိသော ဆဲလ်တစ်ခုချင်းစီကိုသာ ရွေးချယ်လိုသည်ဆိုပါစို့။
ဒါကိုလုပ်ဖို့ အောက်ပါ macro ကို ဖန်တီးနိုင်ပါတယ်။
SubSelectCellsWithData ()
Worksheets(" Sheet1 ").Activate
ActiveSheet.Cells.SpecialCells(xlCellTypeConstants).Activate
End Sub
ဤမက်ခရိုကို ကျွန်ုပ်တို့လုပ်ဆောင်သောအခါ၊ ဒေတာပါရှိသော Sheet1 ရှိ ဆဲလ်တစ်ခုချင်းစီကို ရွေးချယ်ထားသည်ကို တွေ့နိုင်သည်-

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