Pakeitus „Outlook“ užduoties pradžios datą, pagal numatytuosius nustatymus jos terminas bus pakeistas automatiškai. Jei jums tai nepatinka, galite naudoti vieną iš dviejų šiame straipsnyje pristatytų būdų.
Galbūt pastebėjote, kad „Outlook“ užduoties terminas skirsis priklausomai nuo pradžios datos. Tiksliau sakant, pakeitus užduoties pradžios datą, pasikeis ir jos terminas. Nepaisant to, daugelis vartotojų norėtų, kad terminas liktų nepakitęs, net jei pasikeičia pradžios data. Todėl čia atskleisime 2 būdus.

1 būdas: naudokite klavišą „Shift“.
- Pirmiausia, paleiskite „Outlook“ programą kaip įprasta.
- Tada pereikite į sritį „Užduotys“.
- Tada pasirinkite ir atidarykite užduotį dukart spustelėdami ją.
- Po to sekančiame Užduočių lange turėtumėte spustelėti rodyklę žemyn lauke „Terminas“.
- Iššokančiajame „Datos rinkiklio“ lange laikykite nuspaudę klavišą „Shift“ ir tuo pačiu metu spustelėkite datą, kurią norite naudoti kaip naują pradžios datą.
- Pasirinkę tokią datą aukščiau nurodytu būdu, pamatysite, kad laukas „Pradžios data“ buvo pakeistas į naują datą.
- Galiausiai šią užduotį galite išsaugoti paspausdami mygtuką „Išsaugoti ir uždaryti“.
Tai reiškia, kad kiekvieną kartą, kai norite išlaikyti mokėjimo datą keičiant pradžios datą, turite paspausti „Shift“ klavišą. Tai gali būti šiek tiek nuobodu. Todėl čia parodysime dar vieną būdą, kuris yra efektyvesnis.
2 būdas: taikykite Outlook VBA
- Norėdami pradėti, pagrindiniame „Outlook“ ekrane paspauskite klavišų kombinaciją „Alt + F11“.
- Kitame lange „Microsoft Visual Basic for Applications“ galite rasti ir atidaryti projektą „ThisOutlookSession“.
- Tada į šį projektą turėtumėte nukopijuoti šį VBA kodą.
Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objTask As Outlook.TaskItem
Public dStartdate, dDueDate As Date
Private Sub Application_Startup()
Set objInspectors = Outlook.Application.Inspectors
End Sub
Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
If Inspector.CurrentItem.Class = olTask Then
Set objTask = Inspector.CurrentItem
dStartdate = objTask.StartDate
dDueDate = objTask.DueDate
End If
End Sub
Private Sub objTask_PropertyChange(ByVal Name As String)
If Name = "StartDate" Then
If objTask.StartDate <> dStartdate And objTask.StartDate <= dDueDate And objTask.StartDate <> #1/1/4501# Then
objTask.DueDate = dDueDate
objTask.Save
End If
End If
End Sub
- Vėliau šį kodą turėtumėte pasirašyti skaitmeniniu būdu.
- Po to turėtumėte pakeisti „Outlook“ makrokomandos nustatymus, kad įgalintumėte pasirašytus VBA projektus.
- Galiausiai galite paleisti „Outlook“ iš naujo, kad suaktyvintumėte naują makrokomandą.
- Nuo šiol kiekvieną kartą pakeitus užduoties pradžios datą, terminas nebus keičiamas.
Išsaugokite pažeistus PST failus
Kaip visi žinome, „Outlook“ yra pažeidžiama korupcijos. Laimei, „Outlook“ yra aprūpinta integruotu taisymo įrankiu – scanpst. Tačiau, tiesą sakant, daugeliu atvejų tai negali turėti įtakos. Vadinasi, kokybiškas ir patyręs trečiosios šalies taisymo įrankis yra būtinybės reikalas, pvz DataNumen Outlook Repair
Autoriaus įvadas:
Shirley Zhang yra duomenų atkūrimo ekspertė DataNumen, Inc., kuri yra pasaulyje duomenų atkūrimo technologijų lyderė, įskaitant mdf atkūrimas ir „Outlook“ taisymo programinės įrangos produktai. Norėdami gauti daugiau informacijos, apsilankykite WWW.datanumen.com

