Vba ကို အသုံးပြု၍ အတန်းများစွာကို ထည့်သွင်းနည်း

VBA ကို အသုံးပြု၍ Excel တွင် အတန်းများစွာကို ထည့်သွင်းရန် အောက်ပါနည်းလမ်းများကို အသုံးပြုနိုင်သည်။

နည်းလမ်း 1- သတ်မှတ်ထားသော အကွာအဝေးတွင် အတန်းများထည့်ပါ။

 SubInsertMultipleRows ()
Worksheets(" Sheet1 ").Range(" 5:7 ").EntireRow.Insert
End Sub

ဤအထူးမက်ခရိုသည် Sheet1 ဟုခေါ်သော စာရွက်၏အကွာအဝေး 5 မှ 7 အတွင်း ဗလာအတန်းသုံးတန်းကို ထည့်သွင်းပြီး ရှိပြီးသားအတန်းအားလုံးကို အောက်သို့ရွှေ့ပါမည်။

နည်းလမ်း 2- တက်ကြွသောဆဲလ်တစ်ခုအပေါ်အခြေခံ၍ အတန်းများထည့်ပါ။

 SubInsertMultipleRows ()
ActiveCell.EntireRow.Resize(3).Insert Shift:=xlDown
End Sub

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

အောက်ဖော်ပြပါနမူနာများသည် Excel တွင် အောက်ပါဇယားကွက်ဖြင့် နည်းလမ်းတစ်ခုစီကို လက်တွေ့အသုံးပြုနည်းကို ပြသသည်-

ဥပမာ 1- သီးခြားအကွာအဝေးတစ်ခုတွင် အတန်းများထည့်ပါ။

Sheet1 ဟုခေါ်သော စာရွက်၏ အကွာအဝေး 5 မှ 7 အတွင်း အလွတ်သုံးတန်းကို ထည့်သွင်းရန်နှင့် ရှိပြီးသားအတန်းအားလုံးကို အောက်သို့ရွှေ့ရန် အောက်ပါ macro ကို ဖန်တီးနိုင်သည်။

 SubInsertMultipleRows ()
Worksheets(" Sheet1 ").Range(" 5:7 ").EntireRow.Insert
End Sub

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

အတန်း 5 မှ 7 အထိ အတန်းနေရာ 5 တွင် ဗလာ 3 တန်းကို worksheet တွင် ထည့်သွင်းထားကြောင်း သတိပြုပါ။

ဤလိုင်းများတွင် ယခင်ကရှိခဲ့သော တန်ဖိုးများကို ရိုးရှင်းစွာ လျှော့ချထားသည်။

ဥပမာ 2- တက်ကြွသောဆဲလ်တစ်ခုအပေါ်အခြေခံ၍ အတန်းများထည့်ပါ။

ဆဲလ် A3 ကို ကျွန်ုပ်၏စာရင်းဇယားတွင် လောလောဆယ် ရွေးချယ်ထားသည်ဟုဆိုကြပါစို့။

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

 SubInsertMultipleRows ()
ActiveCell.EntireRow.Resize(3).Insert Shift:=xlDown
End Sub

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

အတန်း 3 မှစတင်၍ အလုပ်စာရွက်ထဲသို့ ဗလာအတန်းသုံးတန်း ထည့်သွင်းထားကြောင်း သတိပြုပါ။

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

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

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

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