Vba တွင် dateserial function ကိုအသုံးပြုနည်း (ဥပမာနှင့်အတူ)
သတ်မှတ်ထားသော နေ့၊ လနှင့် တစ်နှစ်အတွက် ရက်စွဲတစ်ခုကို ပြန်ပေးရန်အတွက် VBA တွင် DateSerial လုပ်ဆောင်ချက်ကို သင်အသုံးပြုနိုင်ပါသည်။
ဤလုပ်ဆောင်ချက်ကို လက်တွေ့တွင် အသုံးပြုရန် ဘုံနည်းလမ်းတစ်ခုဖြစ်သည်။
SubUseDateSerial ()
Dim i As Integer
For i = 2 To 13
Range(" D " & i) = DateSerial(Range(" C " & i), Range(" B " & i), Range(" A " & i))
Next i
End Sub
ဤအထူးမက်ခရိုသည် ကော်လံ C ရှိ နှစ်တန်ဖိုးများ၊ ကော်လံ B ရှိ လတန်ဖိုးများနှင့် ကော်လံ A ရှိ နေ့တန်ဖိုးများကို အသုံးပြု၍ အပိုင်းအခြား D2:D13 တွင် ရက်စွဲတန်ဖိုးများကို ပြန်ပေးပါမည်။
အောက်ဖော်ပြပါ ဥပမာသည် လက်တွေ့တွင် DateSerial လုပ်ဆောင်ချက်ကို အသုံးပြုပုံကို ပြသထားသည်။
ဥပမာ- VBA တွင် DateSerial လုပ်ဆောင်ချက်ကို အသုံးပြုနည်း
ကျွန်ုပ်တို့တွင် မတူညီသောရက်စွဲများအတွက် နေ့၊ လနှင့် တစ်နှစ်ကိုပြသသော Excel တွင် အောက်ပါကော်လံများရှိသည်ဆိုပါစို့။
အတန်းတစ်ခုစီရှိ နေ့၊ လနှင့် နှစ်တန်ဖိုးများကို အသုံးပြု၍ ကော်လံ D တွင် ရက်စွဲတန်ဖိုးများကို ပြသလိုသည်ဆိုပါစို့။
ဒါကိုလုပ်ဖို့ အောက်ပါ macro ကို ဖန်တီးနိုင်ပါတယ်။
SubUseDateSerial ()
Dim i As Integer
For i = 2 To 13
Range(" D " & i) = DateSerial(Range(" C " & i), Range(" B " & i), Range(" A " & i))
Next i
End Sub
ကျွန်ုပ်တို့ ဤ macro ကို run သောအခါတွင်၊ ကျွန်ုပ်တို့သည် အောက်ပါ output ကို ရရှိသည် ။
ကော်လံ D သည် ကော်လံ A၊ B နှင့် C တို့မှ နေ့၊ လနှင့် နှစ်တန်ဖိုးများကို အသုံးပြုခြင်းမှ ထွက်ပေါ်လာသော ရက်စွဲတန်ဖိုးကို ဖော်ပြသည်။
မှတ်ချက် – VBA DateSerial လုပ်ဆောင်ချက်အတွက် စာရွက်စာတမ်းအပြည့်အစုံကို ဤနေရာတွင် ရှာဖွေနိုင်ပါသည်။
ထပ်လောင်းအရင်းအမြစ်များ
အောက်ဖော်ပြပါ သင်ခန်းစာများသည် VBA တွင် အခြားဘုံအလုပ်များကို မည်သို့လုပ်ဆောင်ရမည်ကို ရှင်းပြသည်-
VBA တွင် ရက်စွဲများ နှိုင်းယှဉ်နည်း
VBA တွင် ရက်စွဲမှ ရက်သတ္တပတ်နံပါတ်သို့ ပြောင်းလဲနည်း
VBA တွင် ရက်စွဲနှစ်ခုကြားရှိ ရက်များကို တွက်ချက်နည်း