Vba- ရက်စွဲနှစ်ခုကြားရှိ ရက်များကို တွက်ချက်နည်း


ရက်စွဲနှစ်ခုကြားရှိ ရက်အရေအတွက်ကို တွက်ချက်ရန် VBA တွင် အောက်ပါအခြေခံ syntax ကို သင်အသုံးပြုနိုင်သည်-

 SubDaysBetweenDates ()

    Dim i As Integer

    For i = 2 To 7
        Range(" C " & i) = DateDiff(" D ", Range(" A " & i), Range(" B " & i))
    Next i
    
End Sub

ဤဥပမာသည် အပိုင်းအခြား A2:A7 နှင့် B2:B7 ရှိ သက်ဆိုင်ရာဆဲလ်များရှိ ရက်စွဲများအကြား ရက်အရေအတွက်ကို တွက်ချက်ပြီး အပိုင်းအခြား C2:C7 အတွင်းရှိ ရလဒ်များကို ပြန်ပေးပါမည်။

DateDiff လုပ်ဆောင်ချက်ရှိ “ D” အငြင်းအခုံသည် ကျွန်ုပ်တို့သည် ရက်များ၏ သတ်မှတ်ချက်များအရ ရက်စွဲကွာခြားချက်ကို တွက်ချက်လိုကြောင်း သတ်မှတ်သည်ကို သတိပြုပါ။

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

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

ဥပမာ- VBA တွင် ရက်စွဲများကြားရက်များကို တွက်ချက်ပါ။

Excel တွင် ရက်စွဲများပါရှိသော အောက်ပါကော်လံနှစ်ခုရှိသည် ဆိုပါစို့။

အတန်းတစ်ခုစီရှိ စတင်ရက်စွဲနှင့် ပြီးဆုံးသည့်ရက်စွဲအကြား ရက်စွဲအရေအတွက်ကို တွက်ချက်ပြီး ကော်လံ C တွင် ရလဒ်များကို ပြသလိုသည်ဆိုပါစို့။

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

 SubDaysBetweenDates ()

    Dim i As Integer

    For i = 2 To 7
        Range(" C " & i) = DateDiff(" D ", Range(" A " & i), Range(" B " & i))
    Next i
    
End Sub

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

စတင်ရက်စွဲတစ်ခုစီနှင့် ပြီးဆုံးသည့်ရက်စွဲတစ်ခုစီကြားရှိ ရက်စွဲအရေအတွက်ကို ကော်လံ C တွင် ညွှန်ပြထားသည်။

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

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

VBA တွင် ရက်စွဲများ နှိုင်းယှဉ်နည်း
VBA ကို အသုံးပြု၍ ကော်လံတစ်ခုကို စစ်ထုတ်နည်း
VBA တွင် တန်ဖိုးများကို အက္ခရာစဉ်စီရန်

မှတ်ချက်တစ်ခုထည့်ပါ။

သင့် email လိပ်စာကို ဖော်ပြမည် မဟုတ်ပါ။ လိုအပ်သော ကွက်လပ်များကို * ဖြင့်မှတ်သားထားသည်