2 načina, kako ohraniti rok opravila nespremenjen pri spreminjanju njegovega začetnega datuma v Outlooku

Ko spremenite začetni datum opravila v Outlooku, se privzeto samodejno spremeni tudi njegov rok. Če vam to ni všeč, lahko uporabite enega od dveh pristopov, predstavljenih v tem članku.

Morda ste opazili, da se rok za opravilo v Outlooku spreminja glede na datum začetka. Natančneje, ko spremenite datum začetka opravila, se spremeni tudi njegov rok. Kljub temu pa mnogi uporabniki želijo ohraniti rok nespremenjen, tudi če se spremeni datum začetka. Zato bomo tukaj predstavili dva načina.

1. način: Uporabite tipko "Shift"

1. Najprej zaženite aplikacijo Outlook kot običajno.
2. Nato preklopite na področje »Opravila«.
3. Nato izberite in odprite nalogo, tako da jo dvokliknete.
4. Po tem v naslednjem oknu opravil kliknite puščico dol v polju »Datum zapadlosti«.
5. V pojavnem oknu »Izbirnik datuma« držite tipko »Shift« in medtem kliknite na datum, ki ga želite uporabiti kot nov začetni datum.
6. Ko na zgornji način izberete tak datum, boste videli, da se je polje »Začetni datum« spremenilo v novi datum.
7. Končno lahko to nalogo shranite tako, da pritisnete gumb »Shrani in zapri«.

To pomeni, da morate vsakič, ko želite ohraniti datum zapadlosti pri spreminjanju začetnega datuma, pritisniti tipko »Shift«. To je lahko nekoliko dolgočasno. Zato vas bomo tukaj naučili še enega učinkovitejšega načina.

2. način: Uporabite Outlook VBA

1. Za začetek na glavnem zaslonu Outlooka pritisnite tipki »Alt + F11«.
2. V naslednjem oknu »Microsoft Visual Basic for Applications« lahko najdete in odprete projekt »ThisOutlookSession«.
3. Nato v ta projekt kopirajte naslednjo kodo VBA.

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

4. Kasneje bi morali to kodo digitalno podpisati.
5. Po tem spremenite nastavitve makra Outlook, da omogočite podpisane projekte VBA.
6. Sčasoma lahko znova zaženete Outlook, da aktivirate nov makro.
7. Od zdaj naprej se vsakič, ko spremenite začetni datum opravila, rok ne bo spremenil.

Datoteke PST z ogroženim reševanjem

Kot vsi vemo, je Outlook občutljiv na korupcijo. Na srečo je Outlook opremljen z vgrajenim orodjem za popravilo - scanpst. Če sem iskren, v mnogih primerih ne more imeti učinkov. Zato je kakovostno in izkušeno orodje za popravilo tretjih oseb nujno, na primer DataNumen Outlook Repair

Uvod avtorja:

Shirley Zhang je strokovnjakinja za obnovitev podatkov v DataNumen, Inc., ki je vodilna na svetu na področju tehnologij za obnovitev podatkov, vključno z izterjava mdf in obeti za popravilo programskih izdelkov. Za več informacij obiščite www.datanumen.com