မတူညီသောအရောင်အမျိုးအစားများတွင် Outlook အစည်းအဝေးများအတွက် မတူညီသောသတိပေးအချိန်ကို အလိုအလျောက်သတ်မှတ်နည်း

အကယ်၍ သင်သည် Outlook အစည်းအဝေးများကို အရောင်အမျိုးအစားအလိုက် အမျိုးအစားခွဲခြားပြီး မတူညီသောအရောင်အမျိုးအစားများဖြင့် အစည်းအဝေးများအတွက် မတူညီသောသတိပေးချက်အချိန်ကို သတ်မှတ်လိုပါက ဤဆောင်းပါးကို ကိုးကားနိုင်ပါသည်။ ဤတွင် ကျွန်ုပ်တို့သည် Outlook VBA ဖြင့် ၎င်းကို သိရှိနားလည်စေရန် သင်ပေးပါမည်။

ဥပမာအားဖြင့် အစည်းအဝေးများကို အုပ်စုနှစ်စုခွဲထားပါသည်။ တစ်ခုမှာ အစည်းအဝေးတည်နေရာသည် အလွန်ဝေးသောကြောင့် “Offsite” အရောင်အမျိုးအစားဖြစ်ပြီး နောက်တစ်ခုမှာ တည်နေရာသည် ဤနေရာတွင် ရှိနေသောကြောင့် “Onsite” အရောင်အမျိုးအစားဖြစ်သည်။ ယခု Outlook သည် “offsite” အစည်းအဝေး၏ သတိပေးချက်အချိန်ကို စတင်ချိန်မတိုင်မီ ၁ နာရီနှင့် “onsite” အစည်းအဝေးကို စတင်ချိန်မတိုင်မီ ၁၅ မိနစ်အဖြစ် အလိုအလျောက် သတ်မှတ်ပေးနိုင်စေလိုပါသည်။ ဤလိုအပ်ချက်ကိုကြည့်၍ ထို့နောက် အမြန်နည်းလမ်းတစ်ခုကို မျှဝေပါမည်။

မတူညီသောအရောင်အမျိုးအစားများတွင် အစည်းအဝေးများအတွက် မတူညီသောသတိပေးချက်ကို အလိုအလျောက်သတ်မှတ်ပါ။

1. စတင်ရန်၊ သင်၏ Outlook အက်ပ်ကို စတင်ပါ။
2. ထို့နောက် VBA တည်းဖြတ်ဝင်းဒိုးသို့ ဝင်ရောက်ရန် “Alt + F11” ခလုတ်များကို နှိပ်ပါ။
3. ထို့နောက် နောက်ဆက်တွဲဝင်းဒိုးတွင်၊ အောက်ဖော်ပြပါ VBA ကုဒ်ကို “ThisOutlookSession” ပရောဂျက်ထဲသို့ ကူးထည့်ပါ။

Public WithEvents objCalendar As Outlook.Folder
Public WithEvents objCalendarItems As Outlook.Items

Private Sub Application_Startup()
    Set objCalendar = Outlook.Application.Session.GetDefaultFolder(olFolderCalendar)
    Set objCalendarItems = objCalendar.Items
End Sub

Private Sub objCalendarItems_ItemAdd(ByVal Item As Object)
    Call SetReminder_BasedOnCategories(Item)
End Sub

Private Sub objCalendarItems_ItemChange(ByVal Item As Object)
    Call SetReminder_BasedOnCategories(Item)
End Sub

Private Sub SetReminder_BasedOnCategories(ByVal objCalendarItem As Object)
    Dim objMeeting As Outlook.AppointmentItem
    Dim strCategories As String
 
    If objCalendarItem.Class = olAppointment Then
       'Check if the item is a meeting
       If objCalendarItem.MeetingStatus = olMeeting Then
          Set objMeeting = objCalendarItem
          strCategories = objMeeting.Categories
 
          'Set Reminder as 60 min before start for offsite appointments
          If InStr(strCategories, "Offsite") > 0 Then
             With objMeeting
                 .ReminderSet = True
                 .ReminderMinutesBeforeStart = 60
                 .Save
             End With
             'Set Reminder as 15 min before start for onsite appointments
          ElseIf InStr(strCategories, "Onsite") > 0 Then
             With objMeeting
                 .ReminderSet = True
                 .ReminderMinutesBeforeStart = 15
                 .Save
             End With
          End If
       End If
    End If
End Sub

4. နောက်ပိုင်းတွင်၊ ဤ macro ကို run ရန် “Application_Startup” subroutine ထဲသို့ နှိပ်ပြီး “F5” key button ကို နှိပ်ရပါမည်။
5. ထိုအချိန်မှစ၍ အစည်းအဝေးအသစ်တစ်ခုကို ပုံသေပြက္ခဒိန်တွင် ထည့်သွင်းသည့်အခါတိုင်း သို့မဟုတ် လက်ရှိအစည်းအဝေးကို ပြောင်းလဲသည့်အခါတိုင်း၊ Outlook သည် အစည်းအဝေး၏အမျိုးအစားများကို အလိုအလျောက်စစ်ဆေးပြီး မတူညီသောသတိပေးချက်အချိန်ကို အလိုအလျောက်သတ်မှတ်ပေးမည်ဖြစ်သည်။

Outlook အမှားများကိုဖယ်ရှားပါ။

Outlook မှာ တစ်ခါတစ်ရံ ပြဿနာအမျိုးမျိုး ပေါ်ပေါက်နိုင်ပါတယ်။ ဒါကြောင့် Outlook ပြဿနာတွေကို ဘယ်လိုကိုင်တွယ်ဖြေရှင်းရမလဲဆိုတာ အသုံးပြုသူတွေ လေ့လာဖို့ အလွန်အရေးကြီးပါတယ်။ အစပိုင်းမှာ Outlook data တွေကို ပုံမှန် backup လုပ်ထားသင့်ပါတယ်။ ထို့အပြင်၊ တတ်နိုင်ရင် အစွမ်းထက်တဲ့ backup တွေကို သိမ်းဆည်းထားဖို့ အကြံပြုထားပါတယ်။ Outlook ပြုပြင်ခြင်း အနီးနားက tool တွေဖြစ်တဲ့ DataNumen Outlook Repair. Outlook ပြဿနာများကို ရှာဖွေပြီး လွယ်ကူစွာ ဖြေရှင်းရန် သင်၏ PST ဖိုင်ကို စကင်န်ဖတ်နိုင်သည်။

စာရေးသူနိဒါန်း:

Shirley Zhang သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ sql ပြန်လည်နာလန်ထူ နှင့် outlook ပြုပြင်ရေး software ထုတ်ကုန်များ။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com