Vba- ရက်စွဲများဖြင့် match လုပ်ဆောင်ချက်ကို မည်သို့အသုံးပြုရမည်နည်း။
VBA တွင် ရက်စွဲတစ်ခုရှာရန် MATCH လုပ်ဆောင်ချက်ကို အသုံးပြုရန် အောက်ပါ syntax ကို အသုံးပြုနိုင်သည်။
SubMatchDate ()
'attempt to find date in range
On Error GoTo NoMatch
MyMatch = WorksheetFunction.Match(CLng(CDate(" 4/15/2023 ")), Range(" A2:A10 "), 0)
MsgBox (MyMatch)
End
'if no date found, create message box to tell user
NoMatch:
MsgBox (" No Match Found ")
End
End:
End Sub
ဤဥပမာသည် အပိုင်းအခြား A2:A10 ရှိ 04/15/2023 ရက်စွဲကို ရှာဖွေသည်။
ရက်စွဲကို တွေ့ရှိပါက၊ အပိုင်းအခြားရှိ မည်သည့်အတန်းတွင် ရက်စွဲပါရှိသည်ကို သုံးစွဲသူအား ပြောပြသည့် မက်ဆေ့ချ်ဘောက်စ်တစ်ခု ပေါ်လာပါသည်။
ရက်စွဲကို ရှာမတွေ့ပါက “ No matches found” ဟူသော မက်ဆေ့ချ်ဘောက်စ်တစ်ခု ပေါ်လာသောကြောင့် အသုံးပြုသူသည် ရက်စွဲအပိုင်းအခြားတွင် မရှိသည်ကို သိပါသည်။
အောက်ဖော်ပြပါ ဥပမာသည် ဤ syntax ကို လက်တွေ့တွင် မည်သို့အသုံးပြုရမည်ကို ပြသထားသည်။
မှတ်ချက် – CDate လုပ်ဆောင်ချက်သည် စာသားလိုင်းတစ်ခုကို VBA တွင် ရက်စွဲတစ်ခုအဖြစ်သို့ ပြောင်းပေးသည်။
ဥပမာ- VBA ရှိ ရက်စွဲများဖြင့် MATCH Function ကို အသုံးပြုခြင်း။
Excel တွင် A2:A10 အပိုင်းအခြားရှိ အောက်ပါရက်စွဲများစာရင်းရှိသည်ဆိုပါစို့။
အပိုင်းအခြား A2:A10 တွင် 04/15/2023 ရက်စွဲပါရှိသော အတန်းနံပါတ်ကို ရှာဖွေရန် အောက်ပါ macro ကို ဖန်တီးနိုင်သည်။
SubMatchDate ()
'attempt to find date in range
On Error GoTo NoMatch
MyMatch = WorksheetFunction.Match(CLng(CDate(" 4/15/2023 ")), Range(" A2:A10 "), 0)
MsgBox (MyMatch)
End
'if no date found, create message box to tell user
NoMatch:
MsgBox (" No Match Found ")
End
End:
End Sub
ကျွန်ုပ်တို့ ဤ macro ကို run သောအခါတွင်၊ ကျွန်ုပ်တို့သည် အောက်ပါ output ကို ရရှိသည် ။
04/15/2023 ရက်စွဲကို အပိုင်းအခြား A2:A10 ၏ 7th line တွင် တွေ့ရှိခဲ့ကြောင်း မက်ဆေ့ဘောက်စ်တွင် ဖော်ပြထားသည်။
ကျွန်ုပ်တို့သည် 04/25/2023 ရက်စွဲကို ၎င်းအစား ရှာဖွေပါက အောက်ပါရလဒ်ကို ရရှိမည်ကို သတိပြုပါ။
04/25/2023 ရက်စွဲသည် အပိုင်းအခြားအတွင်း မတွေ့ရှိရကြောင်း မက်ဆေ့ဘောက်စ်တွင် ဖော်ပြထားသည်။
မှတ်ချက် – VBA တွင် Match method ၏ စာရွက်စာတမ်းအပြည့်အစုံကို ဤနေရာတွင် ရှာနိုင်သည်။
ထပ်လောင်းအရင်းအမြစ်များ
အောက်ဖော်ပြပါ သင်ခန်းစာများသည် VBA တွင် အခြားဘုံအလုပ်များကို မည်သို့လုပ်ဆောင်ရမည်ကို ရှင်းပြသည်-
VBA- XLOOKUP ကိုအသုံးပြုနည်း
VBA- အညွှန်းနှင့်ကိုက်ညီသော အသုံးပြုနည်း
VBA- စံနှုန်းများစွာဖြင့် INDEX MATCH ကို ဘယ်လိုသုံးမလဲ။