Vba တွင် weekday function ကို အသုံးပြုပုံ (ဥပမာနှင့်အတူ)

ပေးထားသည့်ရက်စွဲမှ ရက်သတ္တပတ်၏နေ့ (ကိန်းပြည့်အဖြစ်) ကိုရယူရန် VBA တွင် Weekday လုပ်ဆောင်ချက်ကို သင်အသုံးပြုနိုင်သည်။

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

 Sub FindWeekday()
    
    Dim i As Integer

    For i = 2 To 9
        Range(" B " & i) = WorksheetFunction.Weekday(Range(" A " & i))
    Next i
    
End Sub

ဤထူးခြားသော မက်ခရိုသည် အပိုင်းအခြား A2:A9 ရှိ ရက်စွဲတစ်ခုစီအတွက် ရက်သတ္တပတ်၏နေ့ (ကိန်းပြည့်အဖြစ်) ကို ရှာဖွေပြီး အပိုင်းအခြား B2:B9 တွင် ရလဒ်များကို ပြသပါမည်။

အောက်ပါကိန်းပြည့်များသည် ရက်သတ္တပတ်၏နေ့ရက်တိုင်းနှင့် သက်ဆိုင်ကြောင်း သတိပြုပါ။

• 1 : တနင်္ဂနွေ
• 2 : တနင်္လာနေ့
• 3 : အင်္ဂါနေ့
• 4 : ဗုဒ္ဓဟူးနေ့
• 5 : ကြာသပတေးနေ့
• 6 : သောကြာနေ့
• 7 : စနေနေ့

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

မှတ်ချက် – သင်သည် ရက်သတ္တပတ်၏နေ့ရက်ကို အမည်အဖြစ် ပြန်လိုပါက၊ ၎င်းအစား WeekdayName လုပ်ဆောင်ချက်ကို အသုံးပြုသင့်သည်။

ဥပမာ- ရက်သတ္တပတ်၏နေ့ကိုရှာဖွေရန် VBA ရှိ Weekday လုပ်ဆောင်ချက်ကိုသုံးပါ။

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

ရက်စွဲတစ်ခုစီအတွက် ရက်သတ္တပတ်၏နေ့ရက် (ကိန်းပြည့်အဖြစ်) ရယူပြီး ကော်လံ B တွင် ရလဒ်များကို ပြသလိုသည်ဆိုပါစို့။

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

 Sub FindWeekday()
    
    Dim i As Integer

    For i = 2 To 9
        Range(" B " & i) = WorksheetFunction.Weekday(Range(" A " & i))
    Next i
    
End Sub

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

ကော်လံ B သည် ကော်လံ A ရှိ ရက်စွဲတစ်ခုစီအတွက် ရက်သတ္တပတ်၏နေ့ (ကိန်းပြည့်အဖြစ်) ပြသည်။

ဥပမာအားဖြင့်:

• 1/1/2023 သည် တနင်္ဂနွေနေ့ဖြစ်သည်၊ ထို့ကြောင့် Weekday function သည် 1 သို့ ပြန်သွားပါသည်။
• 1/4/2023 သည် ဗုဒ္ဓဟူးနေ့ဖြစ်သည်၊ ထို့ကြောင့် Weekday function သည် 4 ကိုပြန်လာသည်။
• 02/23/2023 သည် ကြာသပတေးနေ့ဖြစ်သည်၊ ထို့ကြောင့် Weekday function သည် 5 သို့ ပြန်သွားသည်။

နောက် … ပြီးတော့။

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

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

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

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