မာတိကာ
ဤကျူတိုရီရယ်တွင်၊ excel အတွင်းရှိ အကွာအဝေးရှိ အတန်းများအတွင်း အတန်းများလှည့်ပတ်ရန် VBA အသုံးပြုပုံကို ဖော်ပြပါမည်။ ကျွန်ုပ်တို့သည် တူညီသောအရာကို ထပ်ခါထပ်ခါပြုလုပ်ခြင်းကို တားဆီးရန် ကွင်းပတ်များကို အသုံးပြုသည်။ Microsoft Excel တွင် အလုပ်လုပ်နေစဉ်၊ ကျွန်ုပ်တို့သည် အကြိမ်ပေါင်းများစွာ တူညီသောလုပ်ငန်းကို လုပ်ဆောင်ရမည့် အနေအထားတွင် ရှိနေပါသည်။ VBA ရှိ loops များကို အသုံးပြု၍ ၎င်းကို အလွယ်တကူ ပြုလုပ်နိုင်ပါသည်။ ဤဆောင်းပါးတွင်၊ ကျွန်ုပ်တို့သည် VBA ဖြင့် excel တွင် အတန်းများကို လှည့်ပတ်ရန် ဥပမာများ 6 ကို သရုပ်ပြပါမည်။ ဥပမာများတစ်လျှောက်တွင် ကျွန်ုပ်တို့အသုံးပြုမည့် ကွင်းဆက်မှာ ' For-Next Loop ' ဖြစ်သည်။
အလေ့အကျင့်ဆိုင်ရာစာအုပ်ကို ဒေါင်းလုဒ်လုပ်ပါ
အလေ့အကျင့်ဆိုင်ရာစာအုပ်ကို ဤနေရာမှ ဒေါင်းလုဒ်လုပ်နိုင်ပါသည်။
VBA Loop Through Rows in Range.xlsm
6 Excel တွင် VBA ဖြင့် အကွာအဝေးရှိ အတန်းများကို တန်းစီရန် နမူနာများ
ဥပမာများကို သရုပ်ဖော်ရန် ဤသင်ခန်းစာတွင်၊ ကျွန်ုပ်တို့သည် အောက်ပါဒေတာအတွဲကို အသုံးပြုပါမည်။ ဒေတာအတွဲတွင် 5 အရောင်းဝန်ထမ်း ၏ ပထမနှစ်လအတွက် အရောင်းပမာဏ ပါရှိသည်။
1. အတန်းများတစ်လျှောက် လှည့်ပတ်ရန် အပိုင်းအခြားအလိုက် VBA ကို အသုံးပြုပါ
ပထမဥပမာတွင်၊ excel တွင် VBA ကို အသုံးပြု၍ အကွာအဝေးရှိ အတန်းများအတွင်း အတန်းများတစ်လျှောက် လှည့်ပတ်ရန် အပိုင်းအခြားကို အသုံးပြုပါမည်။ အောက်ပါဒေတာအတွဲတွင် VBA loop တစ်ခုကို အသုံးပြုပါမည်။
ဤနမူနာလုပ်ဆောင်ရန် အဆင့်များကို ကြည့်ကြပါစို့။
အဆင့်-
- အစပြုရန်၊ တက်ကြွသောအလုပ်စာရွက် ' အပိုင်းအခြားပြောင်းလဲမှု ' သို့သွားပါ။
- ထို့ပြင်၊ ညာဖက်ကလစ်နှိပ်ပါ နှင့် ' ကုဒ်ကိုကြည့်ရန် ' ရွေးစရာကို ရွေးပါ။ နှိပ်လို့လည်းရပါတယ်။ Alt + F11 ၎င်းကိုဖွင့်ရန်။
- အထက်ပါလုပ်ဆောင်ချက်သည် ထိုအလုပ်စာရွက်အတွက် ကုဒ်ဝင်းဒိုးတစ်ခုကို ဖွင့်ပေးပါသည်။ .
- ထို့ပြင်၊ ကုဒ်ဝင်းဒိုးတွင် ကုဒ်ကိုရိုက်ထည့်ပါ-
8246
- ထို့နောက် Run ကိုနှိပ်ပါ သို့မဟုတ် F5 <2 ကိုနှိပ်ပါ။>ကုဒ်ကို run ရန်။
- နောက်ဆုံးတွင်၊ အောက်ပါဖန်သားပြင်ဓာတ်ပုံကဲ့သို့ ရလဒ်များကို ကျွန်ုပ်တို့ ရရှိပါမည်။
Read More- Excel VBA- အကွာအဝေးရှိ ကော်လံများ လှည့်ပတ်ခြင်း (ဥပမာ 5 ခု)
2. VBA ကို အသုံးပြု၍ ကိန်းဂဏာန်းပြောင်းလဲနိုင်သော ကိန်းဂဏာန်းဖြင့် အကွာအဝေးရှိ အတန်းများကို လှည့်ပတ်ရန် VBA ကို အသုံးပြုပါ
အကွာအဝေးရှိ အတန်းများကို လှည့်ပတ်ခြင်းအတွက် အခြားရွေးချယ်စရာမှာ ကိန်းရှင်ကို ရွေးချယ်ရန်ဖြစ်သည်။ ဒုတိယဥပမာတွင်၊ ကျွန်ုပ်တို့သည် ကိန်းဂဏာန်းကိန်းရှင်များပါရှိသော အတန်းများအလိုက် အောက်ဖော်ပြပါဒေတာအတွဲတွင် VBA ကို အသုံးပြုပါမည်။
ကိုကြည့်ကြပါစို့။ ဤနည်းလမ်းကို လုပ်ဆောင်ရန် အဆင့်များ။
အဆင့်-
- ပထမဦးစွာ၊ ' Numeric အမည်ရှိ စာရွက်ပေါ်တွင် ညာဘက်ကလစ်နှိပ်ပါ တန်ဖိုး '။
- နောက်တစ်ခု၊ ' ကုဒ်ကိုကြည့်ရန် ' ရွေးစရာကို ရွေးပါ။
- ဤ လုပ်ဆောင်ချက်သည် ထိုအလုပ်စာရွက်အတွက် ကုဒ်ဝင်းဒိုးတစ်ခုကို ဖွင့်ပေးလိမ့်မည်။ ထိုကုဒ်ဝင်းဒိုးကိုဖွင့်ရန် Alt + F11 ကိုနှိပ်နိုင်သည်။
- ထိုဝင်းဒိုးတွင် အောက်ပါကုဒ်ကို ရိုက်ထည့်ပါ-
3737
- ထို့နောက်၊ ကုဒ်ကိုဖွင့်ရန် Run သို့မဟုတ် F5 ကိုနှိပ်ပါ။
- နောက်ဆုံးတွင်၊ အောက်ပါပုံကဲ့သို့ ရလဒ်များကို ကျွန်ုပ်တို့ မြင်တွေ့နိုင်သည်။ အထက်ဖော်ပြပါ ကုဒ်သည် နံပါတ်၏ ဖော်မတ်ကို ဒဿမအမှတ်များအဖြစ် ပြောင်းလဲပါသည်။
ဖတ်ရန်နောက်ထပ်- VBA သည် Excel ရှိ အကွာအဝေးတစ်ခုအတွင်း အတန်းများနှင့် ကော်လံများကို လှည့်ပတ်ရန် (ဥပမာ 5 ခု)
3. အသုံးပြုသူရွေးချယ်ထားသောအကွာအဝေးရှိ Excel VBA တွင် အတန်းလိုက်လှည့်ပတ်ရန် အကွာအဝေး
အတွင်း တတိယဥပမာ၊ အပိုင်းအခြားတစ်ခုအတွင်း အတန်းများလှည့်ပတ်ရန် အသုံးပြုသူရွေးချယ်ထားသောအကွာအဝေးတွင် VBA ကို အသုံးပြုပါမည်။ ထို့ကြောင့်၊ အသုံးပြုသူသည် ဒေတာအတွဲ၏ ရွေးချယ်ထားသော ဧရိယာတွင် ကွင်းဆက်တစ်ခုကို ထည့်သွင်းနိုင်ပါမည်။
ဤဥပမာနှင့် ဆက်စပ်သည့် အဆင့်များကို ကြည့်ကြပါစို့။
အဆင့်-
- အစတွင်၊ ဆဲလ်အပိုင်းအခြား ( D5:D9 ) ကို ရွေးပါ။
- နောက်တစ်ခု၊ ' အသုံးပြုသူရွေးချယ်ထားသော ' ဟု အမည်ပေးထားသည့် တက်ကြွသောစာရွက်ပေါ်တွင် ညာဘက်ကလစ် ။ ' View Code ' ကို ရွေးပါ။
- အထက်ပါ command သည် VBA ကုဒ်ဝင်းဒိုးကို ဖွင့်ပါမည် တက်ကြွသောအလုပ်စာရွက်အတွက်။ Alt + F11 ကိုနှိပ်ခြင်းဖြင့် ထိုကုဒ်ဝင်းဒိုးကိုလည်း ဖွင့်နိုင်သည်။ ထိုဗလာကုဒ်ဝင်းဒိုးတွင် အောက်ပါကုဒ်ကို ထည့်ပါ-
8733
- ထို့နောက်၊ ထိုအလုပ်စာရွက်အတွက် ကုဒ်ကိုဖွင့်ရန် Run ကို နှိပ်ပါ သို့မဟုတ် F5 <ကိုနှိပ်ပါ။ 2>သော့။
- ထို့ကြောင့် ရွေးချယ်ထားသောအပိုင်းအခြား၏ ပထမတန်ဖိုးကိုပြသသည့် မက်ဆေ့ချ်ဘောက်စ်တစ်ခု ပေါ်လာပါသည်။
- ထို့ပြင်၊ သင်သည် အိုကေ ကိုနှိပ်ပါက၊ ၎င်းသည် ရွေးချယ်ထားသော အပိုင်းအခြား၏ ဒုတိယတန်ဖိုးကို ဆဲလ် D6 သို့ ပြန်ပေးပါမည်။
- ဤလုပ်ငန်းစဉ်သည် ဆဲလ် D9 ဖြစ်သည့် ရွေးချယ်ထားသော အပိုင်းအခြား၏ နောက်ဆုံးတန်ဖိုးအထိ ဤလုပ်ငန်းစဉ်ကို ဆက်လက်လုပ်ဆောင်ပါမည်။
နောက်ထပ်ဖတ်ရန်- အကွာအဝေးအတွင်းဒေတာဖြင့်အတန်းများရေတွက်ရန် VBA ကိုအသုံးပြုနည်းExcel (5 Macros)
အလားတူစာဖတ်ခြင်း
- Excel ရှိ Active Cell မှ Range ကိုရွေးချယ်ရန် VBA ကိုအသုံးပြုနည်း (နည်းလမ်း 3 ခု)
- Excel Macro- Dynamic Range ဖြင့် ကော်လံအများအပြားကို စီမည် (နည်းလမ်း 4 ခု)
- Excel VBA တွင် Range သို့ Array ပြောင်းနည်း (3 နည်းလမ်း)
4. VBA ဖြင့် ဒိုင်းနမစ်အကွာအဝေးရှိ အတန်းများတစ်လျှောက် လှည့်ပတ်
စတုတ္ထဥပမာတွင်၊ ကျွန်ုပ်တို့သည် ဒိုင်နမစ်အကွာအဝေးတွင် အတန်းများကိုလှည့်ပတ်ရန် VBA ကို အသုံးပြုပါမည်။ . ဤဥပမာသည် ယခင်ပုံများနှင့် အနည်းငယ်ကွဲပြားသည်။ excel worksheet အတွက် loop အတွင်းရှိ range ကို စိတ်ကြိုက်ပြင်ဆင်နိုင်ပါမည်။ ဤနည်းလမ်းကိုဖော်ပြရန် အောက်ပါဒေတာအတွဲကို အသုံးပြုပါမည်။ အောက်ပါဒေတာအတွဲတွင်၊ ကျွန်ုပ်တို့သည် အပိုင်းအခြား ( B8:C12 ) ၏တန်ဖိုးများကို တိကျသောတန်ဖိုးတစ်ခုဖြင့် ဖြည့်ပေးပါမည်။
အောက်ပါအဆင့်များကိုသာသွားပါ။ ဤနည်းလမ်းကိုလုပ်ဆောင်ရန်။
အဆင့်-
- ပထမဦးစွာ၊ ဆဲလ် B1 နှင့် B1 နှင့် <ဆဲလ်ရှိ 1>C တွင် B2 ။
- ဒုတိယအနေဖြင့်၊ တက်ကြွသောဆဲလ်ပေါ်တွင် ညာဖက်ကလစ်နှိပ်ပါ နှင့် ရွေးစရာ ' ကုဒ်ကိုကြည့်ရန် ကို ရွေးပါ '.
- ဤအမိန့်သည် အသက်ဝင်သော အလုပ်စာရွက်အတွက် VBA ကုဒ်ဝင်းဒိုးကို ဖွင့်ပေးပါမည်။ ထိုကုဒ်ဝင်းဒိုးကိုဖွင့်ရန် နောက်တစ်နည်းမှာ Alt + F11 ကိုနှိပ်ခြင်းဖြင့်ဖြစ်သည်။
- တတိယအချက်အနေဖြင့် ထိုကုဒ်ဝင်းဒိုးတွင် အောက်ပါကုဒ်ကို ထည့်ပါ-
3470
- ယခု၊ ကုဒ်ကိုဖွင့်ရန် Run ကိုနှိပ်ပါ သို့မဟုတ် F5 ကီးကို နှိပ်ပါ။
- ရလဒ်အနေဖြင့် ဒေတာအတွဲသည် တန်ဖိုးနှင့် ပြည့်သွားပါသည်။ $2500.00 အောက်ပါနည်းလမ်းဖြင့်။
မှတ်ချက်-
အထက်ပုံတွင်၊ တန်ဖိုး 6 သည် အပိုင်းအခြား ( B8:B9 ) ၏ ပထမတန်းနှစ်တန်းကို ကိုယ်စားပြုသည်)။
- နောက်ဆုံးအနေနှင့်၊ တန်ဖိုး 9 တွင် ထည့်သွင်းပါ။ ဆဲလ် B1 အစား 6 ။ အောက်ပါပုံတွင် ရလဒ်များကို ကျွန်ုပ်တို့ မြင်တွေ့နိုင်ပါသည်။
5. အပိုင်းအခြားရှိ အတန်းတစ်ခုလုံးကို လှည့်ပတ်ရန် VBA ကို ထည့်ပါ
ပဉ္စမ ဥပမာတွင်၊ အပိုင်းအခြားရှိ အတန်းတစ်ခုလုံးကို လှည့်ပတ်ကြည့်ရှုရန် VBA ကို ကျွန်ုပ်တို့ မည်သို့အသုံးချနိုင်သည်ကို ကျွန်ုပ်တို့ မြင်တွေ့ရပါမည်။ ဤနမူနာသည် ရွေးချယ်ထားသော အတန်းတစ်ခု သို့မဟုတ် အများအပြားမှ သီးခြားတန်ဖိုးတစ်ခု၏ အနေအထားကို ရှာတွေ့လိမ့်မည်။
ထို့ကြောင့်၊ ဤဥပမာကို လုပ်ဆောင်ရန် ကျွန်ုပ်တို့လိုက်နာရမည့် အဆင့်များကို ကြည့်ကြပါစို့။
အဆင့်-
- အစပြုရန်၊ ' အတန်းတစ်ခုလုံး ' ဟု အမည်ပေးထားသည့် စာမျက်နှာပေါ်တွင် ညာဘက်ကလစ်နှိပ်ပါ ကိုနှိပ်ပါ။ ' View Code ' ကို ရွေးပါ။
- အထက်ပါ command သည် ဗလာ VBA ကုဒ်ဝင်းဒိုးကို ဖွင့်ပေးသည် တက်ကြွသောအလုပ်စာရွက်အတွက်။ Alt + F11 ကိုနှိပ်ခြင်းဖြင့် ဤကုဒ်ဝင်းဒိုးကို ကျွန်ုပ်တို့ ရရှိနိုင်ပါသည်။
- ထို့နောက်၊ ထိုကုဒ်ဝင်းဒိုးတွင် အောက်ပါကုဒ်ကို ထည့်ပါ-
8112
- ထို့နောက်၊ Run ကိုနှိပ်ပါ သို့မဟုတ် ကုဒ်ကိုဖွင့်ရန် F5 ကီးကိုနှိပ်ပါ။
- အထက်ပုံတွင်၊ မီးမောင်းထိုးထားသည့်တန်ဖိုး ' Chris ' သည် ကျွန်ုပ်တို့ရှာဖွေမည့်တန်ဖိုးကို ဖော်ပြသည်။ အပိုင်းအခြားတန်ဖိုး ' 5:9 ' သည် ကျွန်ုပ်တို့သည် ဆဲလ်အကွာအဝေး ( B5:B9 ) ရှိတန်ဖိုးကို ကျွန်ုပ်တို့ ရှာဖွေမည်ဟု ညွှန်ပြပါသည်။
- နောက်ဆုံးတွင်၊ မက်ဆေ့ချ်ဘောက်စ်တစ်ခုသည် တန်ဖိုးကို ပြသသည်' Chris ' သည် ဆဲလ် B6 တွင် တည်ရှိသည်။
Read More- VBA အတွက် အသုံးပြုပုံ Excel တွင် အကွာအဝေးတစ်ခုစီရှိ အတန်းတစ်ခုစီ
6. Excel VBA ဖြင့် အကွာအဝေးရှိ n-th အတန်းတိုင်းကို လှည့်ပတ်
နောက်ဆုံးဥပမာတွင်၊ ကျွန်ုပ်တို့သည် VBA <2 ကို အသုံးပြုပါမည်။ အပိုင်းအခြားရှိ n-th အတန်းတိုင်းကို လှည့်ပတ်ရန်။ အောက်ပါဒေတာအတွဲတွင်၊ ကျွန်ုပ်တို့သည် ကျွန်ုပ်တို့၏ဒေတာအပိုင်းအခြား၏ ဂဏန်းနံပါတ်အတန်းများတွင် အရောင်ခြယ်ခြင်းကို အသုံးပြုပါမည်။
ထို့ကြောင့် ဤနည်းလမ်းကိုလုပ်ဆောင်ရန် အဆင့်များကို ကြည့်ကြပါစို့။
အဆင့်-
- ပထမ၊ ' n-th Row ' ဟု အမည်ပေးထားသည့် လက်ရှိစာရွက်ပေါ်တွင် ညာဘက်ကလစ်နှိပ်ပါ ။ ' View Code ' ကို ရွေးပါ။
- နောက်တစ်ခု၊ ၎င်းသည် ဗလာ VBA ကုဒ်ဝင်းဒိုးကို ဖွင့်ပေးသည် ထိုအလုပ်စာရွက်အတွက်။ Alt + F11 ကိုနှိပ်ခြင်းဖြင့် ဤကုဒ်ဝင်းဒိုးကို ကျွန်ုပ်တို့ ရရှိနိုင်သည်။
- ထို့နောက်၊ ထိုကုဒ်ဝင်းဒိုးတွင် အောက်ပါကုဒ်ကို ရိုက်ထည့်ပါ-
2332
- ယခု၊ Run ကိုနှိပ်ပါ သို့မဟုတ် ကုဒ်ကိုဖွင့်ရန် F5 ကီးကိုနှိပ်ပါ။
- နောက်ဆုံးအနေဖြင့်၊ အထက်ဖော်ပြပါ ကုဒ်သည် ကျွန်ုပ်တို့၏ဒေတာအတွဲမှ ဂဏန်းနံပါတ်တန်းများကိုသာ အရိပ်ပေးထားကြောင်း ကျွန်ုပ်တို့တွေ့မြင်နိုင်ပါသည်။
Read More- Excel VBA ဆဲလ်ဗလာသည်အထိ အပိုင်းအခြားကို လှည့်ပတ်ရန် (ဥပမာ 4 ခု)
နိဂုံးချုပ်
နိဂုံးချုပ်အားဖြင့်၊ ဤသင်ခန်းစာတွင် 6 အပိုင်းအခြားရှိ အတန်းများကို တန်းစီခြင်းဆိုင်ရာ ဥပမာများကို ပေးသည် 1>VBA excel တွင်။ သင့်အရည်အချင်းများကို စမ်းသပ်ရန် ဤဆောင်းပါးတွင်ပါရှိသော လေ့ကျင့်ခန်းစာရွက်ကို ဒေါင်းလုဒ်လုပ်ပါ။ သင့်တွင်မေးခွန်းများရှိပါက ကျေးဇူးပြု၍ comment box တွင်ထားခဲ့ပါ။အောက်တွင်။ ကျွန်ုပ်တို့၏အဖွဲ့သည် သင့်မက်ဆေ့ချ်ကို တတ်နိုင်သမျှ အမြန်ဆုံးတုံ့ပြန်ရန် ကြိုးစားပါမည်။ နောက်ထပ်တီထွင်ဆန်းသစ်သော Microsoft Excel ဖြေရှင်းချက်များကို အနာဂတ်တွင် စောင့်ကြည့်ပါ။