Category: လမ်းညွှန်

ပေးထားသည့်ရက်စွဲမှ ရက်သတ္တပတ်၏နေ့ (ကိန်းပြည့်အဖြစ်) ကိုရယူရန် 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 ဤထူးခြားသော...

ပေးထားသည့်ရက်စွဲမှ ရက်သတ္တပတ်၏နေ့ရက်အမည်ကို ရယူရန် VBA တွင် WeekdayName လုပ်ဆောင်ချက်ကို သင်အသုံးပြုနိုင်သည်။ ဤလုပ်ဆောင်ချက်ကို လက်တွေ့တွင် အသုံးပြုရန် ဘုံနည်းလမ်းတစ်ခုဖြစ်သည်။ Sub FindWeekdayName() Dim i As Integer For i = 2 To 9 Range(" B " & i) = WeekdayName(Weekday(Range(" A " & i))) Next i End Sub ဤထူးခြားသော မက်ခရိုသည်...

စာကြောင်းတစ်ခုတွင် သတ်သတ်မှတ်မှတ်ပုံစံတစ်ခုပါရှိမရှိ ဆုံးဖြတ်ရန် VBA ရှိ Like အော်ပရေတာအား သင်အသုံးပြုနိုင်ပါသည်။ ဥပမာအားဖြင့်၊ သင်သည် ဆဲလ်အကွာအဝေး A2 :A10 ရှိ စာကြောင်းတစ်ခုစီတွင် စာကြောင်းခွဲ “ hot” ပါဝင်ခြင်းရှိမရှိ စစ်ဆေးရန် အောက်ပါ syntax ကို အသုံးပြု၍ ရလဒ်များကို ပြသနိုင်သည်- SubCheckLike () Dim i As Integer For i = 2 To 10 If Range("A" &...

ပေးထားသောဆဲလ်သည် ရက်စွဲဟုတ်မဟုတ် စစ်ဆေးရန် VBA တွင် IsDate လုပ်ဆောင်ချက်ကို အသုံးပြုနိုင်သည်။ ပေးထားသည့်ဆဲလ်တစ်ခုရှိတန်ဖိုးကို ရက်စွဲတစ်ခုအဖြစ် အသိအမှတ်ပြုပါက ဤလုပ်ဆောင်ချက်သည် True ပြန်သွားပါမည်။ မဟုတ်ရင် function က False ပြန်ဖြစ်သွားလိမ့်မယ်။ ဤလုပ်ဆောင်ချက်ကို လက်တွေ့တွင် အသုံးပြုရန် ဘုံနည်းလမ်းတစ်ခုဖြစ်သည်။ SubCheckDate () Dim i As Integer For i = 1 To 9 If IsDate(Range(" A " & i))...

ဖော်မြူလာတစ်ခုက #N/A အမှားကို ထုတ်ပေးပါက တိကျသောတန်ဖိုးတစ်ခုကို ပြန်ပေးရန်အတွက် VBA ရှိ IfNa နည်းလမ်းကို သင်အသုံးပြုနိုင်ပါသည်။ ဤသည်မှာ IfNa ကို လက်တွေ့တွင် အသုံးပြုရန် ဘုံနည်းလမ်းတစ်ခုဖြစ်သည်။ Sub UseVLOOKUP() With Application Range(" F2 ").Value = .IfNa(.Vlookup(Range(" E2 "), Range(" A2:C11 "),3,False), "No Value Found") End With End Sub ဤအထူးသဖြင့် macro သည်...

အလုပ်စာအုပ်တစ်ခုခုကို လက်ရှိဖွင့်ထားခြင်းရှိမရှိ စစ်ဆေးရန် VBA တွင် အောက်ပါအထားအသိုကိုသုံးနိုင်သည်။ SubCheckWorkbookOpen () Dim resultCheck As Boolean Dim wb As Workbook Dim specific_wb As String On Error Resume Next specific_wb = InputBox("Check if this workbook is open:") Set wb = Application.Workbooks.Item(specific_wb) resultCheck = Not wb Is...

သတ်မှတ်ထားသော နေ့၊ လနှင့် တစ်နှစ်အတွက် ရက်စွဲတစ်ခုကို ပြန်ပေးရန်အတွက် VBA တွင် DateSerial လုပ်ဆောင်ချက်ကို သင်အသုံးပြုနိုင်ပါသည်။ ဤလုပ်ဆောင်ချက်ကို လက်တွေ့တွင် အသုံးပြုရန် ဘုံနည်းလမ်းတစ်ခုဖြစ်သည်။ SubUseDateSerial () Dim i As Integer For i = 2 To 13 Range(" D " & i) = DateSerial(Range(" C " & i), Range(" B "...

သတ်မှတ်ထားသော စတင်ချိန်နှင့် ပြီးဆုံးသည့်ရက်စွဲများကြားတွင် လုပ်ငန်းရက်ပေါင်း အရေအတွက်ကို ရှာဖွေရန် VBA တွင် NetworkDays နည်းလမ်းကို အသုံးပြုနိုင်သည်။ ရုံးဖွင့်ရက်များတွင် ပိတ်ရက်များနှင့် ရုံးပိတ်ရက်များ မပါဝင်ကြောင်း သတိပြုပါ။ ဤနည်းလမ်းကို လက်တွေ့တွင် အသုံးပြုရန် ဘုံနည်းလမ်းတစ်ခုဖြစ်သည်။ Sub CalculateNetworkDays() Dim i As Integer For i = 2 To 9 Range("C" & i) = WorksheetFunction.NetworkDays(Range("A" & i), Range("B" &...

ကပ်လျက်ဆဲလ်များရှိ တန်ဖိုးများကို အခြေခံ၍ Excel ရှိ ဆဲလ်များတွင် အခြေအနေအလိုက် ဖော်မတ်ချခြင်းကို ကျင့်သုံးရန်၊ Home တက်ဘ်ရှိ သတ်မှတ်ချက်အတိုင်း ဖော်မတ်ချခြင်း လျှော့နည်းမီနူးရှိ New Rule ရွေးချယ်မှုကို သင်သုံးနိုင်သည်။ အောက်ပါဥပမာများသည် မတူညီသောအခြေအနေနှစ်ခုဖြင့် ဤရွေးချယ်မှုကို လက်တွေ့အသုံးချနည်းကို ပြသသည်- 1. ကပ်လျက်ဆဲလ်ရှိ စာသားတန်ဖိုးအပေါ် အခြေခံ၍ အခြေအနေအလိုက် ဖော်မတ်ချခြင်းကို အသုံးပြုပါ။ 2. ကပ်လျက်ဆဲလ်ရှိ ကိန်းဂဏာန်းတန်ဖိုးအပေါ် အခြေခံ၍ အခြေအနေအလိုက် ဖော်မတ်ကို အသုံးပြုပါ။ သွားကြရအောင်! ဥပမာ 1- ကပ်လျက်ဆဲလ်ရှိ...

Excel တွင် လက်ရှိရက်စွဲမှ 6 လအတွင်း ရက်စွဲများပါသည့် ရက်စွဲများပါသည့် ဆဲလ်များတွင် အခြေအနေအလိုက် ဖော်မတ်ချခြင်းကို ကျင့်သုံးရန်၊ Home တက်ဘ်ရှိ Conditional Formatting drop- down menu တွင် New Rule option ကို အသုံးပြုနိုင်သည်။ အောက်ပါဥပမာသည် ဤရွေးချယ်မှုကို လက်တွေ့တွင် မည်သို့အသုံးပြုရမည်ကို ပြသထားသည်။ ဥပမာ- အခြေအနေအရ ဖော်မတ်ချခြင်းကို 6 လအတွင်း ရက်စွဲများတွင် အသုံးပြုပါ။ ကျွန်ုပ်တို့တွင် လူအမျိုးမျိုး အနားယူမည့်အချိန်ကို ပြသသော Excel...