မီတာအတွက်ost အသုံးပြုသူများ၊ စနေ၊ တနင်္ဂနွေတွင် စီစဉ်ထားသော ချိန်းဆိုမှုများသည် အများအားဖြင့် သီးသန့်ဖြစ်သည်။ ထို့ကြောင့်၊ ၎င်းတို့သည် Outlook ကဲ့သို့ ချိန်းဆိုမှုများကို သီးသန့်အဖြစ် အလိုအလျောက် အမှတ်အသားပြုပြီး ပြသစေလိုပါသည်။ ဤဆောင်းပါးတွင်၊ ကျွန်ုပ်တို့သည် ဇာတ်ညွှန်းအနည်းငယ်ဖြင့် ၎င်းကို အမှန်တကယ်ဖြစ်လာစေရန် ပြုလုပ်ပါမည်။
လုပ်ငန်းနှင့် သီးသန့်ချိန်းဆိုမှုများကြားတွင် ပိုမိုလွယ်ကူစွာ ခွဲခြားနိုင်စေရန် Outlook သည် သုံးစွဲသူများအား ချိန်းဆိုမှုများကို သီးသန့်အဖြစ် အမှတ်အသားပြုခွင့်ပြုသည်။ ဤနည်းအားဖြင့် သင်သည် သီးသန့်ချိန်းဆိုမှုများမပါဘဲ ပြက္ခဒိန်ကို ပရင့်ထုတ်ရန် အလွန်အဆင်ပြေပြီး လွယ်ကူသည်ကို တွေ့ရမည်ဖြစ်သည်။ ဤအခြေအနေတွင်၊ သင်သည် သင်၏ Outlook အား အလိုအလျောက် အသိအမှတ်ပြုပြီး သီးသန့်ချိန်းဆိုမှုများကို သီးသန့်အဖြစ် အမှတ်အသားပြုလိုပေမည်။ ဥပမာအားဖြင့်၊ ယေဘုယျအားဖြင့် စနေ၊ တနင်္ဂနွေတွင် ချိန်းဆိုမှုများသည် သီးသန့်ဖြစ်ပြီး၊ ထို့ကြောင့် Outlook သည် ၎င်းတို့အား သီးသန့်အဖြစ် အလိုအလျောက် အမှတ်အသားပြုထားလိုသည်။ အဲဒီနောက်မှာတော့ မင်းကို အောင်မြင်အောင် လမ်းညွှန်ပေးမယ်။
စနေ၊ တနင်္ဂနွေ ချိန်းဆိုမှုများကို သီးသန့်အဖြစ် အလိုအလျောက် အမှတ်အသားပြုပါ။
- ပထမဦးစွာ၊ "" အရ Outlook VBA editor ကိုဖွင့်ပါ။သင်၏ Outlook တွင် VBA ကုဒ်ကိုမည်သို့ဖွင့်မည်နည်း။"။
- ထို့နောက်၊ “Microsoft Visual Basic for Applications” ဝင်းဒိုးတွင်၊ “ThisOutlookSession” ပရောဂျက်တွင် အောက်ပါကုဒ်ကို ထည့်ပါ။
Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objExplorer As Outlook.Explorer
Public WithEvents objAppointment As Outlook.AppointmentItem
Private Sub Application_Startup()
Set objInspectors = Outlook.Application.Inspectors
Set objExplorer = Outlook.Application.ActiveExplorer
End Sub
Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
If Inspector.CurrentItem.Class = olAppointment Then
Set objAppointment = Inspector.CurrentItem
End If
End Sub
Private Sub objExplorer_Activate()
On Error Resume Next
If objExplorer.Selection.Item(1).Class = olAppointment Then
Set objAppointment = objExplorer.Selection.Item(1)
End If
End Sub
Private Sub objAppointment_Open(Cancel As Boolean)
Call MarkWeedendAppointmentPrivate(objAppointment)
End Sub
Private Sub objAppointment_PropertyChange(ByVal Name As String)
If Name = "Start" Or Name = "End" Then
Call MarkWeedendAppointmentPrivate(objAppointment)
End If
End Sub
Private Sub MarkWeedendAppointmentPrivate(ByVal objAppointment As Outlook.AppointmentItem)
Dim dStartDate As Date
dStartDate = Format(objAppointment.Start, "Short Date")
'If the appointment start falls on weekend
Select Case Weekday(dStartDate)
Case 7, 1
'Mark it private
objAppointment.Sensitivity = olPrivate
End Select
End Sub
- ပြီးရင် restarmacro ကိုအသက်သွင်းရန် t Outlook ။
- ယခုမှစ၍၊ ချိန်းဆိုမှုအသစ်တစ်ခုဖန်တီးခြင်း သို့မဟုတ် လက်ရှိရက်ချိန်းကို သီတင်းပတ်ကုန်တွင် ပြောင်းလဲသည့်အခါတိုင်း၊ Outlook သည် ၎င်းအား သီးသန့်အဖြစ် အလိုအလျောက် အမှတ်အသားပြုမည်ဖြစ်သည်။
စိတ်အနှောင့်အယှက်ဖြစ်စေသော Outlook ပြဿနာများကို ဖြေရှင်းပါ။
မထင်မှတ်ထားသော အပလီကေးရှင်း အေးခဲခြင်း၊ ပေါ့ပ်အပ် အမှားအယွင်း မက်ဆေ့ချ်များ စသည်တို့ကဲ့သို့သော Outlook နှင့် ကိုင်တွယ်ရာတွင် ပြဿနာအချို့ကို သင်ကြုံတွေ့ရနိုင်သည် ။ သူတို့ကို ဒုက္ခပေးတဲ့အခါ မင်း စိတ်ပူလိမ့်မယ်။ စိတ်လျှော့ပါ။ ထိတ်လန့်မှုက ဘာမှ မကူညီနိုင်ပေမယ့် အခြေအနေ ပိုဆိုးသွားအောင် လုပ်ပါ။ ပထမနေရာတွင်၊ သင်သည် ပုံမှန်အတိုင်း PST ဖိုင်ကို ဝင်ရောက်ကြည့်ရှုနိုင်သလား စစ်ဆေးနိုင်ပါသည်။ သို့ဆိုလျှင်၊ သင်သည် PST ဖိုင်ကို ပြုပြင်ရမည်ဖြစ်ပြီး၊ ၎င်းမှတစ်ဆင့် ပြီးမြောက်နိုင်သည်။ inbox ပြုပြင်ရေးကိရိယာ သို့မဟုတ် ပိုအားကောင်းသော ပြင်ပကိရိယာတစ်ခု၊ DataNumen Outlook Repair.
စာရေးသူနိဒါန်း:
Shirley Zhang သည် ဒေတာပြန်လည်ရယူရေးဆိုင်ရာ ကျွမ်းကျင်သူဖြစ်သည်။ DataNumen, Inc. အပါအဝင် ဒေတာပြန်လည်ရယူရေးနည်းပညာများတွင် ကမ္ဘာ့ခေါင်းဆောင်ဖြစ်သည်။ mdf ပြုပြင်ခြင်း။ နှင့် outlook ပြုပြင်ရေး software ထုတ်ကုန်များ။ ပိုမိုသိရှိလိုပါကသွားရောက်ကြည့်ရှု www ။datanumen.com

