မာတိကာ
ဤဆောင်းပါးသည် Excel တွင် အမည်ပါသော စာရွက်တစ်ခုကို ထည့်သွင်းနည်း VBA တွင် သင့်မေးခွန်းများအတွက် အဖြေများကို ပေးပါသည်။ ဒီလိုထူးခြားတဲ့လှည့်ကွက်မျိုးတွေကို သင်ရှာနေတယ်ဆိုရင် သင့်တော်တဲ့နေရာကို ရောက်နေပါပြီ။ ဤတွင်၊ ကျွန်ုပ်တို့သည် 6 အလွယ် & Excel VBA တွင် အမည်တစ်ခုပါသော စာရွက်တစ်ရွက်ကို သက်သေပြနိုင်သော နည်းလမ်းများ။
လေ့ကျင့်ရေးစာအုပ်ကို ဒေါင်းလုဒ်လုပ်ပါ
သင်ကိုယ်တိုင် ပိုမိုကောင်းမွန်စွာ နားလည်ပြီး လေ့ကျင့်ရန်အတွက် အောက်ပါ Excel အလုပ်စာအုပ်ကို ဒေါင်းလုဒ်လုပ်နိုင်ပါသည်။
Name.xlsm ဖြင့် စာရွက်ထည့်ခြင်းအမည်ဖြင့် စာရွက်ကိုထည့်ရန် VBA ကုဒ်
ထည့်ရန် Sheets object ကို အသုံးပြုပါမည်။ Excel တွင်စာရွက်တစ်ခု။ အမည်ပါသောစာရွက်တစ်ရွက်ကိုထည့်ရန် အခြေခံ VBA ကုဒ်သည် အောက်ဖော်ပြပါတစ်ခုနှင့်တူသည်။
Sheets.Add ([Before], [After], [Count], [Type])
မတိုင်မီ- စိတ်ကြိုက်ရွေးချယ်နိုင်သည် ။ ၎င်းသည် သီးခြားစာရွက်တစ်ခုမတိုင်မီ စာရွက်အသစ်တစ်ခုကို ပေါင်းထည့်သည်။
ပြီးနောက်- ၎င်းသည်လည်း စိတ်ကြိုက်ရွေးချယ်နိုင်သည်။ ၎င်းသည် သီးခြားစာရွက်တစ်ခုပြီးနောက် စာရွက်အသစ်တစ်ခုကို ပေါင်းထည့်သည်။
အရေအတွက်- ၎င်းသည် ရွေးချယ်နိုင်သော ကန့်သတ်ဘောင်တစ်ခုလည်းဖြစ်သည်။ ၎င်းသည် ပေါင်းထည့်ရမည့် စာရွက်အရေအတွက်ကို ညွှန်ပြသည်။
အမျိုးအစား- ၎င်းသည်လည်း စိတ်ကြိုက်ရွေးချယ်နိုင်သည်။ ၎င်းသည်စာရွက်အမျိုးအစားကိုသတ်မှတ်သည်။ ဤတွင်၊ မူရင်းတန်ဖိုးမှာ xlWorksheet ဖြစ်သည်။
Excel VBA တွင် အမည်ဖြင့်စာရွက်ထည့်ရန် မတူညီသောနည်းလမ်း 6 ခု
Excel တွင်၊ ပေါင်းထည့်ခြင်းဖြင့် စာရွက်အသစ်တစ်ခုကို ထပ်ထည့်နိုင်သည် ⊕ စာရွက်အမည်ဘေးရှိ အိုင်ကွန်။ Excel တွင် တူညီသောအလုပ်တစ်ခုကို အလိုအလျောက်လုပ်ဆောင်ရန် သင်တွေးဖူးပါသလား။ VBA သင် အကျုံးဝင်နေသောကြောင့် တွေးမနေတော့ပါ။
ဤတွင် ကျွန်ုပ်တို့တွင် အရောင်းအစီရင်ခံစာ အမည်ရှိ အလုပ်စာရွက်တစ်ခု ရှိသည်။ ၎င်းတွင် နေ့စဉ်ရောင်းချမှုများ ပါရှိသည်။ကော်ဖီဆိုင်တစ်ခု၏ အစီရင်ခံပါ။ ကော်လံ B ၊ C နှင့် D တွင်၊ အရောင်းကိုယ်စားလှယ် ၊ အရာများ နှင့် <1 တို့၏ အမည်များ ရှိပါသည်။>ပမာဏ အသီးသီး။
ဤတွင်၊ VBA macro ၏အကူအညီဖြင့် ဤအလုပ်စာအုပ်တွင် အခြားစာရွက်များကို ပေါင်းထည့်ပါမည်။
ဤတွင်၊ ကျွန်ုပ်တို့သည် Microsoft Excel 365 ဗားရှင်းကို အသုံးပြုထားပြီး၊ သင်သည် သင့်အဆင်ပြေမှုအရ အခြားဗားရှင်းကိုမဆို အသုံးပြုနိုင်ပါသည်။
1. Excel VBA တွင် အမည်ဖြင့် စာရွက်ထည့်ခြင်း
ကျွန်ုပ်တို့၏ပထမနည်းလမ်းတွင်၊ အသုံးပြုသူထည့်သွင်းမှု မှ အမည်ပါသောစာရွက်တစ်ရွက်ကို ပေါင်းထည့်ပါမည်။ သင်လေ့လာလိုလျှင် ဤရိုးရှင်းသောအဆင့်များကို လိုက်နာပါ။
📌 အဆင့်များ-
- အစပိုင်းတွင်၊ သို့သွားပါ။ Developer တက်ဘ်။
- ဒုတိယအနေဖြင့်၊ Code အုပ်စုရှိ Visual Basic ကို ရွေးပါ။
- တနည်းအားဖြင့် ALT ကို နှိပ်ပါ။ + F11 တူညီသောလုပ်ဆောင်စရာကိုလုပ်ဆောင်ရန်။
မှတ်ချက်- သေချာစွာနှိပ်ပါ SPACEBAR ၏ ဘယ်ဘက်ရှိ ALT ခလုတ်။ သင်သည် အခြားသော ALT ကီးများကို အသုံးပြုပါက လုပ်ဆောင်ချက်သည် လုပ်ဆောင်မည်မဟုတ်ပါ။
- ချက်ချင်း၊ အပလီကေးရှင်းများအတွက် Microsoft Visual Basic ဝင်းဒိုး ပွင့်လာပါသည်။
- နောက်ပိုင်းတွင်၊ Insert တက်ဘ်သို့ ရွှေ့ပါ။
- ထို့နောက် ရွေးချယ်စရာများမှ Module ကို ရွေးပါ။
- လက်ရှိတွင်၊ ၎င်းသည် Module ကုဒ်ကိုဖွင့်ပါသည်။
- ပြီးနောက်၊ အောက်ပါကုဒ်ကို Module တွင်ရေးပါ။
5329
Code Breakdown
- ပထမဦးစွာ၊ ကျွန်ုပ်တို့သည် Sub Procedure ဟုခေါ်သည် Add_Sheet_with_Name ။
- ထို့နောက်၊ ကျွန်ုပ်တို့သည် ပြောင်းလဲနိုင်သောအမျိုးအစားများကို သတ်မှတ်ပါသည်။
- နောက်ပိုင်းတွင်၊ အမှားဆက်လက်လုပ်ဆောင်ရန် နောက်တစ်ခု ကြေညာချက်ကို ထပ်ပေါင်းထည့်ပါသည်။ ၎င်းသည် မည်သည့်အမှားအယွင်းများကိုမဆို လျစ်လျူရှုပါမည်။
- ပြီးနောက်၊ အသုံးပြုသူထံမှ စာရွက်အမည်ကို ရယူရန် InputBox ကို အသုံးပြုခဲ့သည်။ ထို့အပြင်၊ InputBox မှ စာသားစာကြောင်းကို sheet_name variable တွင် သိမ်းဆည်းထားပါသည်။
- နောက်တစ်ခု၊ sheet_name သည် ဗလာဖြစ်ပါက၊ ကုဒ် ရှေ့ဆက်မည်မဟုတ်ပါ။
- နောက်ဆုံးတွင်၊ ကျွန်ုပ်တို့သည် အသစ်ဖန်တီးထားသောစာရွက်ကို အမည်ပေးရန် Add.Name နည်းလမ်းကို အသုံးပြုနေပါသည်။ ဤတွင်၊ အမည်သည် sheet_name variable နှင့် တူညီပါမည်။
- ယခုအချိန်တွင် Run ကိုနှိပ်ပါ။ (⏵) သင်္ကေတ။ ယင်းအစား၊ သင်သည် သင်၏ကီးဘုတ်ပေါ်တွင် F5 ကိုနှိပ်နိုင်သည်။
- ရုတ်တရက်၊ ၎င်းသည် အဝင်အကွက်တစ်ခုပွင့်သွားပါသည်။
- ဤတွင်၊ စာရွက်အသစ်၏အမည်ကို ထည့်ပါ။ ဤကိစ္စတွင်၊ ကျွန်ုပ်တို့သည် အကွက်တွင် Profit ကိုရေးထားသည်။
- နောက်မှ၊ OK ကိုနှိပ်ပါ။
- ထို့ကြောင့်၊ ကျွန်ုပ်တို့၏ကုဒ်သည် လည်ပတ်မည်ဖြစ်ပြီး၊ ၎င်းသည် Profit ဟု အမည်ပေးထားသော စာရွက်ကို ပေါင်းထည့်မည်ဖြစ်သည်။
မှတ်ချက်- ကျွန်ုပ်တို့၏စာရွက်အတွက် မည်သည့်နေရာကိုမျှ ဖော်ပြထားခြင်းမရှိပါ။ ပုံမှန်အားဖြင့်၊ ၎င်းကို တက်ကြွသောစာရွက်ရှေ့တွင် ထားရှိထားသည်။
နောက်ထပ်ဖတ်ရန်- စာရွက်ကို အခြားအလုပ်စာအုပ်တွင်ထည့်ရန် Excel VBA (အဆင်ပြေသောဥပမာ 3 ခု)
2. Specific Sheet ရှေ့တွင် အမည်ဖြင့် Sheet ထည့်ရန် Excel VBA ကို အသုံးပြုခြင်း
ကျွန်ုပ်တို့၏ ဒုတိယနည်းလမ်းတွင်၊ သီးခြားစာရွက်တစ်ခုရှေ့တွင် နာမည်တစ်ခုနှင့် စာရွက်တစ်ခုကို ပေါင်းထည့်ပါမည်။ လုပ်ငန်းစဉ်အဆင့်ဆင့်ကို လေ့လာကြည့်ရအောင်အဆင့်။
📌 အဆင့်များ-
- ပထမဦးစွာ၊ Module ဝင်းဒိုးတွင် ပြထားသည့်အတိုင်း Module ဝင်းဒိုးတွင် ပြထားသည့်အတိုင်း၊ 1>နည်းလမ်း 1 ။
- ဒုတိယအနေဖြင့်၊ ၎င်းတွင် အောက်ပါကုဒ်ကို ရေးပါ။
6345
ကုဒ်ခွဲခြမ်းစိတ်ဖြာခြင်း
- ပထမဦးစွာ၊ ကျွန်ုပ်တို့သည် Sub Procedure ကို Add_Sheet_Before_Specific_Sheet အဖြစ် ခေါ်နေပါသည်။
- ထို့နောက် အရောင်းအစီရင်ခံစာ စာရွက်ကို စတင်အသုံးပြုပါသည်။ ကျွန်ုပ်တို့သည် အခြားစာရွက်ပေါ်တွင် ရှိနေပါက ကုဒ်သည် လည်ပတ်နေမည်ကို သေချာစေသည်။
- နောက်တစ်ခု၊ အသစ်ဖန်တီးထားသော စာရွက်ကို အမည်ပေးရန် Add.Name နည်းလမ်းကို အသုံးပြုနေပါသည်။ အလုပ်စာအုပ်မှ Profit ဟုခေါ်သော စာရွက်ရှေ့တွင် ဤစာရွက်ကို ဖန်တီးပါမည်။ ထို့အပြင်၊ ကျွန်ုပ်တို့သည် စာရွက်အား Balance Sheet ဟု အမည်ပေးထားပါသည်။
- ပြီးနောက်၊ နည်းလမ်းတွင် ပြထားသည့်အတိုင်း ကုဒ်ကို ဖွင့်ပါ။ 1 ။
- ထို့ကြောင့်၊ အမြတ်အစွန်း ဟု အမည်ပေးထားသော စာရွက်ရှေ့တွင် စာရွက်အသစ်တစ်ခု ထပ်ထည့်ပါမည်။
နောက်ထပ်ဖတ်ရန်- Variable Name ဖြင့် Sheet ကိုထည့်ရန် Excel VBA (စံပြဥပမာ 5 ခု)
3. စာရွက်ထည့်ရန် Excel VBA ကိုအသုံးပြုခြင်း Specific Sheet ပြီးနောက် အမည်ဖြင့်
ဤနည်းလမ်းတွင်၊ Profit ဟု အမည်ပေးထားသော စာရွက်နောက်တွင် စာရွက်တစ်ခုကို ပေါင်းထည့်ပါမည်။ လုပ်ငန်းစဉ်အသေးစိတ်ကြည့်ရအောင်။
📌 အဆင့်များ-
- ပထမတော့ ကုဒ် Module<2 ကို ယူလာပါ နည်းလမ်း 1 တွင်ပြထားသည့်အတိုင်း> window တွင်ပြထားသည့်အတိုင်း။
- ထို့နောက်၊ အောက်ပါကုဒ်ကို ၎င်းတွင်ရေးပါ။
4930
ဤကုဒ်သည် <၏ကုဒ်နှင့်နီးပါးတူပါသည်။ 1>နည်းလမ်း 2 ။ ဤနေရာတွင် ကျွန်ုပ်တို့သည် ကန့်သတ်ချက် After ကို အသုံးပြုခဲ့သည်။ အရင် ထက်။ တိကျသောစာရွက်တစ်ရွက်ကိုအောင်မြင်သော စာရွက်အသစ်ကို ထပ်ထည့်လိုသောကြောင့်ဖြစ်သည်။
- ပြီးနောက်၊ နည်းလမ်း 1 တွင်ပြထားသည့်အတိုင်း ကုဒ်ကို run ပါ။
- ထို့ကြောင့်၊ Profit ဟု အမည်ပေးထားသော စာရွက်နောက်တွင် စာရွက်အသစ်တစ်ခု ထပ်ထည့်ပါမည်။
နောက်ထပ်ဖတ်ရန်- Excel VBA မပါပါက စာရွက်ထည့်ရန် Excel VBA (အမြန်အဆင့်များဖြင့်)
4. အလုပ်စာအုပ်အစတွင် အမည်ဖြင့် စာရွက်ကို ထည့်သွင်းခြင်း
ဤကဏ္ဍတွင်၊ ကျွန်ုပ်တို့သည် VBA ကို အသုံးပြု၍ Excel တွင် အလုပ်စာအုပ်၏အစတွင် စာရွက်အသစ်တစ်ခုကို ထည့်သွင်းပါမည်။ ထို့ကြောင့် နောက်ထပ်မနှောင့်နှေးဘဲ၊ ကျွန်ုပ်တို့ မည်သို့လုပ်ဆောင်သည်ကို ကြည့်ကြပါစို့။
📌 အဆင့်များ-
- အစပိုင်းတွင်၊ ကုဒ်ကို ယူလာပါ Module ကို နည်းလမ်း 1 တွင် ပြထားသည့်အတိုင်း ဝင်းဒိုး။
- ထို့နောက်၊ အောက်ပါကုဒ်ကို ၎င်းထဲသို့ ရေးပါ။
9421
ဤတွင်၊ ကျွန်ုပ်တို့ ထပ်ထည့်သည် အလုပ်စာအုပ်၏ ပထမစာရွက်ရှေ့တွင် အလုပ်စာရွက်အသစ်။ ဆိုလိုသည်မှာ အလုပ်စာအုပ်အစတွင် ဖြစ်သည်။ ရလဒ်အနေနဲ့၊ အခုက ပထမဆုံးစာရွက်ပါ။ ထို့အပြင်၊ ကျွန်ုပ်တို့သည် စာရွက်ကို ကုမ္ပဏီပရိုဖိုင် ဟု အမည်ပေးထားသည်။
- ထို့နောက် နည်းလမ်း 1 တွင် ပြထားသည့်အတိုင်း ကုဒ်ကို ဖွင့်ပါ။
- ထို့ကြောင့်၊ ၎င်းသည် အလုပ်စာအုပ်၏အစတွင် ကုမ္ပဏီပရိုဖိုင် စာရွက်အသစ်တစ်ခုကို ပေါင်းထည့်ပါမည်။
နောက်ထပ်ဖတ်ရန်- Excel Macro- စာရွက်အသစ်ဖန်တီးပြီး အမည်ပြောင်းပါ (စံပြနမူနာ 3 ခု)
5. Excel VBA ကို အသုံးပြု၍ Workbook အဆုံးတွင် Sheet ကိုထည့်ရန်
ဤကဏ္ဍတွင်၊ ကျွန်ုပ်တို့သည် အလုပ်စာအုပ်၏ နောက်ဆုံးစာရွက်နောက်တွင် စာရွက်တစ်ရွက်ကို ပေါင်းထည့်မည် ။ ဖြစ်စဉ်ကို သရုပ်ပြခွင့်ပြုပါ။အောက်တွင်။
📌 အဆင့်များ-
- အဓိကအားဖြင့်၊ <1 တွင်ပြထားသည့်အတိုင်း Module window ကိုဖွင့်ပါ>နည်းလမ်း 1 ။
- ဒုတိယအနေဖြင့်၊ ၎င်းတွင် အောက်ပါကုဒ်ကို ကူးထည့်ပါ။
3840
ကုဒ်ခွဲခြမ်းစိတ်ဖြာခြင်း
- ပထမဦးစွာ၊ ကျွန်ုပ်တို့သည် Sub Procedure ကို Sheet_End_Workbook ဟုခေါ်ဆိုပါသည်။
- နောက်တစ်ခု၊ အသစ်ဖန်တီးထားသောစာရွက်ကို အမည်ပေးရန် Add.Name နည်းလမ်းကို အသုံးပြုနေပါသည်။ အလုပ်စာအုပ်၏ နောက်ဆုံးစာရွက်ပြီးနောက် ဤစာရွက်ကို ဖန်တီးပါမည်။ Sheets.Count ပိုင်ဆိုင်မှုမှ နောက်ဆုံးစာရွက်နံပါတ်ကို ကျွန်ုပ်တို့ ရယူနိုင်ပါသည်။ ထို့အပြင်၊ ကျွန်ုပ်တို့သည် ဝင်ငွေရှင်းတမ်း စာရွက်ကို အမည်ပေးထားပါသည်။
- ထို့နောက် နည်းလမ်းတွင် ပြထားသည့်အတိုင်း ကုဒ်ကို run ပါ။ 1 ။
- ထို့ကြောင့်၊ ၎င်းသည် အလုပ်စာအုပ်၏အဆုံးတွင် ဝင်ငွေရှင်းတမ်း စာရွက်အသစ်တစ်ခုကို ပေါင်းထည့်ပါမည်။
ပိုမိုဖတ်ရန်- အလုပ်စာအုပ်အသစ်ဖန်တီးပြီး Excel တွင် VBA ကိုအသုံးပြု၍ သိမ်းဆည်းပါ
6. Excel VBA မှ Cell Value ကိုအသုံးပြုခြင်း စာရွက်များစွာကို မိတ်ဆက်ခြင်း
နောက်ဆုံးနည်းလမ်းအတွက်၊ Excel VBA ကို အသုံးပြု၍ ဆဲလ်အကွာအဝေးမှ အမည်ဖြင့် အလုပ်စာအုပ်တွင် စာရွက်များစွာကို ပေါင်းထည့်ပါမည်။ ထို့အပြင်၊ အမည်ကိုယူရန် အပိုင်းအခြား၏ ထည့်သွင်းမှုအတွက် အသုံးပြုသူကို ကျွန်ုပ်တို့ တောင်းဆိုပါမည်။ ဒီတော့ အောက်ပါအဆင့်တွေကို ကြည့်ကြရအောင်။
📌 အဆင့်များ-
- ပထမတော့ ကုဒ်ကိုဖွင့်ပါ Module တွင် ပြထားသည့်အတိုင်း နည်းလမ်း 1 ဝင်းဒိုး။
- ပြီးနောက်၊ အောက်ပါကုဒ်ကို ကူးယူပြီး ၎င်းထဲသို့ ကူးထည့်ပါ။
1512
ကုဒ်ခွဲခြမ်းစိတ်ဖြာခြင်း
- ပထမဦးစွာ၊ ကျွန်ုပ်တို့သည် Sub ကို ခေါ်သည်Add_Multiple_Sheets_Using_Cell_Value အဖြစ် လုပ်ငန်းစဉ်။
- ထို့နောက်၊ ကျွန်ုပ်တို့သည် ပြောင်းလဲနိုင်သော အမျိုးအစားများကို သတ်မှတ်ပါသည်။
- ထို့နောက်၊ သုံးစွဲသူထံမှ ဒေတာအကွာအဝေးကို ရယူရန် InputBox ကို အသုံးပြုပါသည်။
- စတုတ္ထအနေဖြင့်၊ ကျွန်ုပ်တို့သည် အရောင်းအစီရင်ခံချက် စာရွက်ကို အသက်သွင်းပါသည်။
- နောက်ပိုင်းတွင်၊ ရွေးချယ်ထားသောဆဲလ်အပိုင်းအခြားကို တစ်ခုပြီးတစ်ခုဖြတ်သန်းရန် နောက်တစ်ခုစီအတွက် loop တစ်ခုကို အသုံးပြုပါသည်။
- နောက်တစ်ခု၊ ကျွန်ုပ်တို့သည် အသစ်ဖန်တီးထားသောစာရွက်ကို အမည်ပေးရန် Add.Name နည်းလမ်းကို အသုံးပြုနေပါသည်။ အလုပ်စာအုပ်၏ အရောင်းအစီရင်ခံချက် စာရွက်များပြီးနောက် ဤစာရွက်များကို ဖန်တီးပါမည်။
- ယခုပြထားသည့်အတိုင်း ကုဒ်ကို run ပါ နည်းလမ်း 1 ။
- ချက်ချင်း၊ Exceldemy ထည့်သွင်းသည့်အကွက် ပွင့်လာပါသည်။
- ထို့နောက် B5:B9<2 အတွင်းရှိ ဆဲလ်များကို ပေးပါ။ အကွက်အတွင်းရှိ> အပိုင်းအခြား။
- နောက်ဆုံးတွင်၊ OK ကိုနှိပ်ပါ။
- နောက်ဆုံးတွင်၊ ၎င်းသည် <ထည့်သွင်းပါမည် 1>ငါး B5:B9 အပိုင်းအခြားရှိ ဆဲလ်တန်ဖိုးများကို အမည်ပေးထားသော စာရွက်များ။ ၎င်းတို့အားလုံးသည် အရောင်းအစီရင်ခံစာ စာရွက်နောက်တွင်ဖြစ်သည်။
နိဂုံး
ဤဆောင်းပါးသည် စာရွက်များထည့်ရန်အတွက် လွယ်ကူပြီး အတိုချုံးဖြေရှင်းနည်းများကို ပေးပါသည်။ Excel VBA ဖြင့် အမည်များဖြင့်။ Practice ဖိုင်ကို ဒေါင်းလုဒ်လုပ်ရန် မမေ့ပါနှင့်။ ဤဆောင်းပါးကိုဖတ်ရှုခြင်းအတွက် ကျေးဇူးတင်ပါသည်၊ ဤအရာက အထောက်အကူဖြစ်မည်ဟု မျှော်လင့်ပါသည်။ မေးခွန်းများ သို့မဟုတ် အကြံပြုချက်များရှိပါက မှတ်ချက်ကဏ္ဍတွင် ကျွန်ုပ်တို့အား အသိပေးပါ။ နောက်ထပ်လေ့လာရန် ကျွန်ုပ်တို့၏ဝဘ်ဆိုဒ် Exceldemy သို့ ဝင်ရောက်ကြည့်ရှုပါ။