မာတိကာ
ကျွန်ုပ်တို့သည် နည်းလမ်းများစွာဖြင့် Excel တွင် အတန်းနံပါတ်များကို ရှာတွေ့နိုင်သော်လည်း VBA တွင် အင်္ဂါရပ်များနှင့် စိတ်ကြိုက်ပြင်ဆင်မှုများကို ပိုမိုလုပ်ဆောင်ပေးပါသည်။ အတန်းနံပါတ်များကို စမတ်ကျသောနည်းလမ်းများဖြင့် ရှာဖွေနိုင်သည်။ ယနေ့ ဤဆောင်းပါးသည် VBA ကို အသုံးပြု၍ Excel တွင် အတန်းနံပါတ်ရှာဖွေရန် အသုံးဝင်သော မက်ခရို 4 ခုကို ပြသပါမည်။
အလေ့အကျင့်စာအုပ်ကို ဒေါင်းလုဒ်လုပ်ပါ
သင်သည် ဤနေရာမှ အခမဲ့ Excel workbook ကို ဒေါင်းလုဒ်လုပ်နိုင်ပါသည်။ အမှီအခိုကင်းစွာ လေ့ကျင့်ပါ။
VBA.xlsm ကိုအသုံးပြု၍ အတန်းနံပါတ်ရှာပါ
4 Macros မှ အတန်းနံပါတ်ရှာရန် VBA Excel တွင်
ကွဲပြားသောဒေသများရှိ အရောင်းသမားအရောင်းသမားအချို့၏အရောင်းအားကိုကိုယ်စားပြုသည့်နည်းလမ်းများကိုစူးစမ်းလေ့လာရန်အသုံးပြုမည့်ကျွန်ုပ်တို့၏ဒေတာအစုံကိုမိတ်ဆက်လိုက်ပါ။
Macro 1- ရွေးချယ်မှုပြောင်းခြင်းဖြင့် အတန်းနံပါတ်ရှာရန် VBA
ပထမ၊ ကျွန်ုပ်တို့သည် မည်သည့်ဆဲလ်ကိုမဆိုရွေးချယ်ခြင်းဖြင့် အတန်းနံပါတ်ကိုရှာဖွေရန် Excel တွင် Macro VBA ကိုအသုံးပြုပါမည်။ ဆိုလိုသည်မှာ သင်အသုံးပြုထားသည့်ဆဲလ်များကိုသာ ရွေးချယ်ပါက မက်ခရိုသည် အတန်းနံပါတ်ကို ချက်ချင်းပြသမည်ဖြစ်သည်။ ယင်းအတွက်၊ သင်သည် ကုဒ်များကို စာရွက်ထဲတွင် မဟုတ်ဘဲ မော်ဂျူးတွင် သိမ်းဆည်းထားရပါမည်။
အဆင့်များ-
- ညာဘက်- စာရွက်ခေါင်းစဉ်ကို နှိပ်ပြီး View Code ကို ဆက်စပ်မီနူး မှ ရွေးချယ်ပါ။
- ထို့နောက် ၎င်းကို ရေးပါ။ အောက်ပါကုဒ်များ-
7249
- နောက်ပိုင်းတွင်၊ ကုဒ်များကိုဖွင့်ရန်မလိုအပ်ပါ၊ သင့်စာရွက်သို့ ပြန်သွားပါ။
ကုဒ်ခွဲခြမ်းစိတ်ဖြာခြင်း-
- ပထမဦးစွာ၊ ကျွန်ုပ်သည် Private Sub လုပ်ထုံးလုပ်နည်း – Worksheet_SelectionChange ကို ဖန်တီးခဲ့သည်။
- ထို့နောက် ကိန်းရှင် Rnumber အဖြစ် ကြေညာခဲ့သည်။ Integer ။
- row သည် တက်ကြွသောဆဲလ်၏ အတန်းနံပါတ်ကို ဆုံးဖြတ်ပေးလိမ့်မည်။
- နောက်တစ်ခု၊ အကယ်၍ ထုတ်ပြန်ချက်သည် စစ်ဆေးပါမည် တက်ကြွသောဆဲလ်သည် ဗလာဖြစ်နေသည်ဖြစ်စေ မရှိသည်ဖြစ်စေ ထို့နောက် MsgBox သည် အထွက်ကိုပြသပါမည်။
- ယခုအသုံးပြုထားသောဆဲလ်ကိုနှိပ်လိုက်ရုံဖြင့် အတန်းကိုပြသမည်ဖြစ်သည်။ နံပါတ်။
ပိုမိုဖတ်ရန်- Excel VBA- ကော်လံရှိ စာကြောင်းကိုရှာပြီး အတန်းပြန်ပို့သည့် နံပါတ်
Macro 2- VBA ကိုအသုံးပြုထားသော Active Cell ၏အတန်းနံပါတ်ကိုရှာပါ
ဤ macro သည် ကျွန်ုပ်တို့၏စာရွက်၏သတ်မှတ်ထားသောဆဲလ်တစ်ခုအတွင်းရှိတက်ကြွသောဆဲလ်တစ်ခု၏အတန်းနံပါတ်ကိုပြန်ပေးလိမ့်မည်။ ထို့ကြောင့်၊ ကျွန်ုပ်တို့သည် ကျွန်ုပ်တို့၏ကုဒ်များရှိ အလုပ်စာရွက်အမည်နှင့် အထွက်ဆဲလ်ကို ဖော်ပြရပါမည်။ ဤတွင်၊ ကျွန်ုပ်တို့သည် Cell D14 ကို ကျွန်ုပ်တို့၏ အထွက်ဆဲလ်အဖြစ် အသုံးပြုပါမည်။
အဆင့်များ-
- နှိပ် ALT + F11 VBA window ကိုဖွင့်ရန်။
- နောက်တစ်ခု၊ မော်ဂျူးအသစ်တစ်ခုထည့်သွင်းရန် အောက်ပါအတိုင်းနှိပ်ပါ- Insert > မော်ဂျူး ။
- ထို့နောက်၊ မော်ဂျူးတွင် အောက်ပါကုဒ်များကို ရိုက်ထည့်ပါ-
6266
- ထို့နောက် သင့်စာရွက်သို့ ပြန်လှည့်ပါ။
ကုဒ် အပိုင်းပိုင်း-
- ဤနေရာတွင် ၊ Find_Row_Number_of_an_Active_Cell() သည် Sub
- wSheet ကို Worksheet
- အဖြစ်ကြေငြာသည် ထို့နောက် Set ကြေငြာချက်သည် တက်ကြွသောဆဲလ်ကို ရွေးလိမ့်မည်
- အပိုင်းအခြား သည် အထွက်ဆဲလ်အတွင်းရှိ အတန်းနံပါတ်ကို ပြန်ပေးလိမ့်မည်။
- ယခု ဆဲလ်တစ်ခုကို ရွေးပြီး အောက်ပါအတိုင်း နှိပ်ပါ- ဆော့ဖ်ဝဲရေးသားသူ >Macros ။
- Macro dialog box တွင်ပေါ်လာပြီးနောက်၊ macro အမည်ကိုရွေးချယ်ပြီး ကိုနှိပ်ပါ။ Run ။
မကြာမီ၊ ရွေးချယ်ထားသောဆဲလ်၏ အတန်းနံပါတ်ကို ကျွန်ုပ်တို့၏ အထွက်ဆဲလ်တွင် ပြန်ပေါ်လာကြောင်း သင်တွေ့ရပါမည်။
ဆဲလ် B8 ကို ရွေးထားသည်ကို သင်တွေ့မြင်နိုင်သည်၊ ထို့ကြောင့် 8 သည် output ဖြစ်သည်။
ပိုမိုဖတ်ရန်- Excel တွင် လက်ရှိဆဲလ်များ၏ အတန်းနံပါတ်ကို ရယူနည်း (အမြန်နည်းလမ်း 4 ခု)
အလားတူစာဖတ်ခြင်း
- အတန်းနံပါတ်ကို တိုးနည်း Excel ဖော်မြူလာ (6 လွယ်ကူသောနည်းလမ်းများ)
- Excel VBA ဖြင့် Range မှ အတန်းနံပါတ်ကိုရယူပါ (ဥပမာ 9 ခု)
- တစ်တန်း၏နံပါတ်ပြန်နည်း Excel တွင် Cell Match (7 Methods)
- Excel တွင် Cell Value မှ အတန်းနံပါတ်ရယူနည်း (နည်းလမ်း 5 ခု)
Macro 3- တန်ဖိုးတစ်ခုကို ယှဉ်ခြင်းဖြင့် အတန်းနံပါတ်ရှာရန် VBA
တန်ဖိုးတစ်ခုကို ရှာဖွေခြင်းဖြင့် အတန်းနံပါတ်ကို ရှာလိုပါက ဤ macro သည် သင့်အတွက်ဖြစ်သည်။ အောက်ပါပုံတွင်ပြထားသည့်အတိုင်း ကုဒ်များတွင် ရှာဖွေမှုတန်ဖိုးနှင့် ကော်လံနံပါတ်ကို ဖော်ပြရပါမည်။
အဆင့်များ-
- ပထမအဆင့်ကို လိုက်နာပါ။ မော်ဂျူးအသစ်တစ်ခုထည့်သွင်းရန် ယခင်နည်းလမ်းမှ အဆင့်နှစ်ဆင့်ရှိသည်။
- ထို့နောက် ၎င်းတွင် အောက်ပါကုဒ်များကို ထည့်ပါ-
8908
- ထို့နောက် သင့်ထံသို့ ပြန်သွားပါ။ စာရွက်။
ကုဒ်ခွဲခြမ်းစိတ်ဖြာခြင်း-
- ဤတွင် Find_Row_Matching_a_Value() Sub
- နှင့် wBook နှင့် wSheet အဖြစ် ကြေငြာထားသည် Worksheet နှင့် fCell ကို Range အဖြစ် ကြေငြာထားပါသည်။
- wBook နှင့် wSheet ကို သတ်မှတ်ထားသည် ActiveWorkbook နှင့် ActiveSheet အတွက်။
- Const သည် ရှာဖွေမှုတန်ဖိုးအတွက် ထည့်သွင်းပေးပါမည်။
- နောက်ပိုင်းတွင်၊ အပိုင်းအခြား သည် ဖော်ပြထားသော ကော်လံမှတစ်ဆင့် တန်ဖိုးကို ရှာဖွေပါမည်။
- နောက်တစ်ခု၊ If နှင့် Else ကြေညာချက်သည် MsgBox ကို အသုံးပြု၍ ရလဒ်ကို ပြသပါမည်။
- နောက်ပိုင်း၊ ယခင်နည်းလမ်းမှ 5th အဆင့်ကို လိုက်နာပါ Macro dialog box ကိုဖွင့်ရန်
- ကို ရွေးပါ macro name ပြီး Run ကိုနှိပ်လိုက်ရုံပါပဲ။
မကြာခင်မှာ အကြောင်းကြားချက်ဘောက်စ်တစ်ခုက သင့်အတွက် အတန်းနံပါတ်ကို ပြပါလိမ့်မယ်။
နောက်ထပ်ဖတ်ရန်- Excel VBA- တန်ဖိုး၏ အတန်းနံပါတ် (5 သင့်လျော်သောနည်းလမ်းများ)
Macro 4- အတန်းနံပါတ်ရှာရန် ခလုတ်
ကျွန်ုပ်တို့၏နောက်ဆုံးနည်းလမ်းတွင်၊ VBA macro ကိုအသုံးပြု၍ အတန်းနံပါတ်ကိုဆုံးဖြတ်ရန် အကောင်းမွန်ဆုံးနည်းလမ်းကို သင့်အားပြသပါမည်။ ကျွန်ုပ်တို့သည် ခလုတ်တစ်ခုပြုလုပ်ပြီး ၎င်းနှင့်အတူ မက်ခရိုတစ်ခုကို သတ်မှတ်ပေးပါမည်။ ခလုတ်ကို နှိပ်လိုက်သောအခါတွင် ကျွန်ုပ်တို့သည် အတန်းနံပါတ်လိုချင်သော ရှာဖွေမှုတန်ဖိုးကို ထည့်သွင်းပေးနိုင်သည့် input box ကို ဖွင့်ပေးမည်ဖြစ်သည်။ ယခင် macro သည် ဖော်ပြထားသော ကော်လံတစ်ခုမှတဆင့် ရှာဖွေနိုင်သော်လည်း ဤ macro သည် စာရွက်ရှိ မည်သည့်ကော်လံကိုမဆို ရှာဖွေနိုင်ပါသည်။
အဆင့်များ-
- တဖန် မော်ဂျူးအသစ်တစ်ခုထည့်သွင်းရန် ဒုတိယနည်းလမ်း မှ ပထမအဆင့်နှစ်ဆင့်ကို လိုက်နာပါ။
- ထို့နောက်၊ ၎င်းတွင် အောက်ပါကုဒ်များကို ထည့်ပါ-
3050
- ထို့နောက်သို့ ပြန်သွားပါ။ သင်၏စာရွက်။
ကုဒ် ခွဲခြမ်းစိတ်ဖြာခြင်း-
- ပထမ၊ ငါဖန်တီးခဲ့သည် Sub လုပ်ငန်းစဉ် Find_Row_Number()။
- ထို့နောက် ကိန်းရှင်နှစ်ခု၊ mValue အဖြစ် String နှင့် row အဖြစ် Range ။
- ထို့နောက် တန်ဖိုးတစ်ခုထည့်သွင်းရန် InputBox ကို အသုံးပြုခဲ့သည်။
- နောက်ပိုင်းတွင်၊ Set နှင့် If ထုတ်ပြန်ချက် အလွတ်မဟုတ်ပါက အတန်းနံပါတ်ကိုတွေ့လိမ့်မည်။
- နောက်ဆုံးတွင်၊ MsgBox သည် အထွက်ကိုပြသပါမည်။
- နောက်မှ ကိုနှိပ်ပါ။ ပြုစုသူ > ထည့်သွင်းပြီး ခလုတ် အမိန့်ကို ပုံစံထိန်းချုပ်မှုကဏ္ဍ မှ ရွေးချယ်ပါ။
- ထို့နောက် သင်သည် သင်၏ကာဆာဖြင့် အပေါင်းလက္ခဏာ ကို ရရှိမည်ဖြစ်ပြီး၊ သင်အလိုရှိသော အရွယ်အစားအလိုက် စာရွက်ပေါ်တွင် ကလစ်နှိပ်ခြင်းဖြင့် မည်သည့်နေရာကိုမဆို ဆွဲယူကာ ကလစ်ကို လွှတ်လိုက်ပါ။
- မောက်စ်ကို လွှတ်ပြီးနောက် သတ်မှတ် Macro ဒိုင်ယာလော့ဂ်ဘောက်စ် အလိုအလျောက်ပွင့်လာပါမည်။
- ကုဒ်များတွင် ဖော်ပြထားသည့်အတိုင်း မက်ခရိုအမည် ကို ရွေးပါ။
- ထို့နောက် OK ကို နှိပ်ပါ။
- ထို့နောက် ခလုတ်ပေါ်တွင် ညာကလစ်နှိပ်ပြီး စာသားတည်းဖြတ်ရန် ကိုရွေးချယ်ပါ ခလုတ်အမည်ကို တည်းဖြတ်ရန်။
- ခလုတ်အမည်ကို ရိုက်ထည့်ပါ၊ ထို့နောက် ခလုတ်အပြင်ဘက်ရှိ မည်သည့်နေရာတွင်မဆို နှိပ်လိုက်ပါက နာမည်ပြောင်းပါမည်။
- ယခုခလုတ်ကိုနှိပ်ပါ၊ ၎င်းသည် input box ကိုဖွင့်ပါမည်။
- နောက်ဆုံးတွင်၊ ရှာဖွေမှုတန်ဖိုးကိုထည့်သွင်းပြီး ကိုနှိပ်ပါ။ အိုကေ ။
ယခုကြည့်ပါ၊ ၎င်းသည် လိုက်ဖက်သော အတန်းနံပါတ်ကို ပြသနေပါသည်။တန်ဖိုး။
နောက်ထပ်ဖတ်ရန်- ကော်လံတွင် စာကြောင်းကိုရှာပြီး Excel တွင် အတန်းနံပါတ်ပြန်ပို့ပါ (7 နည်းလမ်းများ)
နိဂုံးချုပ်
ဆောင်းပါးအတွက် ဒါပါပဲ။ အထက်ဖော်ပြပါ လုပ်ထုံးလုပ်နည်းများသည် VBA ကိုအသုံးပြု၍ excel တွင် အတန်းနံပါတ်ရှာရန် လုံလောက်မည်ဟု မျှော်လင့်ပါသည်။ မှတ်ချက်ကဏ္ဍတွင် မည်သည့်မေးခွန်းကိုမဆို မေးမြန်းနိုင်ပြီး ကျေးဇူးပြု၍ အကြံပြုချက်ပေးပါ။ ပိုမိုစူးစမ်းလေ့လာရန် ExcelWIKI သို့သွားပါ။