Vba- နံပါတ်သည် ရက်စွဲထက်ကြီးသည်။

သတ်မှတ်ထားသောရက်စွဲထက်ကြီးသောရက်စွဲအရေအတွက်ကိုရေတွက်ရန် VBA တွင်အောက်ပါအခြေခံအထားအသိုကိုသုံးနိုင်သည်။

 Sub CountifGreaterDate()
Range(" D2 ") = WorksheetFunction.CountIf(Range(" A2:A10 "), ">" & Range(" C2 "))
End Sub

ဤဥပမာသည် ဆဲလ် C2 ရှိ ရက်စွဲထက် များသော အပိုင်းအခြား A2:A10 ရှိ ရက်စွဲများ အရေအတွက်ကို ရေတွက်သည်။

ထို့နောက် ရလဒ်ကို ဆဲလ် D2 သို့ သတ်မှတ်ပေးသည်။

အောက်ဖော်ပြပါ ဥပမာသည် ဤ syntax ကို လက်တွေ့တွင် မည်သို့အသုံးပြုရမည်ကို ပြသထားသည်။

ဥပမာ- VBA ကိုသုံး၍ ရက်စွဲထက်ကြီးသောရေတွက်

Excel တွင်အောက်ပါရက်စွဲများစာရင်းရှိသည်ဆိုပါစို့၊ 04/25/2023 ထက်ကြီးသောရက်စွဲအရေအတွက်ကို သိလိုသည်ဆိုပါစို့။

ဒါကိုလုပ်ဖို့ အောက်ပါ macro ကို ဖန်တီးနိုင်ပါတယ်။

 Sub CountifGreaterDate()
Range(" D2 ") = WorksheetFunction.CountIf(Range(" A2:A10 "), ">" & Range(" C2 "))
End Sub

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

Cell D2 သည် 04/25/2023 ထက်ကြီးသော အပိုင်းအခြား A2:A10 တွင် ရက်စွဲ 6 ရက်ရှိကြောင်း ကျွန်ုပ်တို့ကို ပြောပြသည်။

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

ဥပမာအားဖြင့်၊ ကျွန်ုပ်တို့သည် ဆဲလ် C2 တွင် ရက်စွဲကို 10/1/2023 သို့ ပြောင်းပြီး မက်ခရိုကို ထပ်မံလုပ်ဆောင်သည်ဆိုပါစို့-

10/1/2023 ထက်ကြီးသောရက်စွဲ 3 ခုရှိသည်ကိုကျွန်ုပ်တို့မြင်သည်။

မှတ်ချက်- အကယ်၍ သင်သည် သတ်မှတ်ထားသော ရက်စွဲတစ်ခု ထက် ကြီးသော သို့မဟုတ် တူညီသော ရက်စွဲအရေအတွက်ကို ရေတွက်လိုပါက၊ CountIf လုပ်ဆောင်ချက်တွင် “>” ကို “>=” ဖြင့် အစားထိုးပါ။

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

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

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