Vba- ရက်စွဲကို ရက်သတ္တပတ်နံပါတ်သို့ ဘယ်လိုပြောင်းမလဲ။

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

 Sub FindWeekNumber()
    
    Dim i As Integer

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

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

VBA WeekNum နည်းလမ်းသည် ရက်သတ္တပတ်များသည် တနင်္ဂနွေနေ့တွင် စတင်သည်ဟု ယူဆကြောင်း သတိပြုပါ။

ရက်သတ္တပတ်၏အစအဖြစ် အခြားရက်ကို သတ်မှတ်ရန်၊ WeekNum နည်းလမ်းသို့ ဒုတိယအငြင်းအခုံတစ်ခုကို ထည့်နိုင်သည်။

 Sub FindWeekNumber()
    
    Dim i As Integer

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

အောက်ပါဥပမာသည် လက်တွေ့တွင် ရက်စွဲများကို ရက်သတ္တပတ်နံပါတ်များသို့ ပြောင်းလဲရန် WeekNum နည်းလမ်းကို အသုံးပြုနည်းကို ပြသထားသည်။

ဥပမာ- VBA တွင် ရက်စွဲသို့ ရက်သတ္တပတ်နံပါတ်သို့ ပြောင်းပါ။

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

ရက်စွဲတစ်ခုစီကို ရက်သတ္တပတ်နံပါတ်အဖြစ် ပြောင်းပြီး ကော်လံ B တွင် အပတ်နံပါတ်ကို ပြသလိုသည်ဆိုပါစို့။

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

 Sub FindWeekNumber()
    
    Dim i As Integer

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

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

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

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

 Sub FindWeekNumber()
    
    Dim i As Integer

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

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

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

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

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

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

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