2 načina za nastavitev privzetega končnega datuma ponavljajočih se Outlookovih sestankov

Ko v Outlooku omogočite »Ponavljanje« za sestanek, bo ta privzeto nastavljen brez končnega datuma. Če ga želite spremeniti in določiti privzeti končni datum za ponavljajoče se sestanke, lahko uporabite metode, predstavljene v tem članku.

Ko ustvarite nov sestanek in kliknete gumb »Ponavljanje«, lahko v pojavnem pogovornem oknu »Ponavljanje sestanka« vidite, da je privzeto izbrano »Brez končnega datuma«, kot je prikazano na naslednji sliki. Če vam to ni všeč in želite nastaviti privzeti končni datum, na primer 90 dni od prvega pojava, lahko nadaljujete. Tu vas bomo naučili 2 pristopa, kako to uresničiti.

1. način: nastavite s spreminjanjem registra

1. Za začetek pojdite v meni »Start« in poiščite »regedit«.
2. Nato kliknite najdeni program "regedit".
3. Nato se prikaže pogovorno okno »Nadzor uporabniškega računa«, v katerem morate klikniti »Da«.
4. Po vstopu v okno »Urejevalnik registra« se pomaknite do poti - »HKEY_CURRENT_USER \ Software \ Microsoft \ Office \ \ Outlook \ Možnosti \ Koledar «
5. Kasneje z desno miškino tipko kliknite »Koledar« in izberite »Novo«> »DWORD (32-bitna) vrednost«.
6. Nato tej novi vrednosti dodelite ime »RecurrencesDefault«.
7. Nato dvakrat kliknite vrednost.
8. V pojavno okno »Uredi vrednost DWORD (32-bit)« vnesite številko v polje »Podatki o vrednosti«. Nanaša se na štetje dni od danes. Če je na primer »90«, bo Outlook določil končni datum ponovitve na 90 dni od danes.
9. Nato kliknite »V redu« in pravilno zapustite urejevalnik registra.
10. Sčasoma znova zaženite Outlook in poskusite ustvariti ponavljajoči se sestanek. Njegov končni datum bo nastavljen glede na vrednost »RecurrencesDefault«.

2. način: nastavite z Outlook VBA

1. Za začetek zaženite urejevalnik VBA v Outlooku s kombinacijo tipk »Alt + F11«.
2. Nato vstavite naslednjo kodo VBA v projekt »ThisOutlookSession«.

Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objAppointment As Outlook.AppointmentItem

Private Sub Application_Startup()
     Set objInspectors = Outlook.Application.Inspectors
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeOf Inspector.CurrentItem Is AppointmentItem Then
       Set objAppointment = Inspector.CurrentItem
    End If
End Sub

Private Sub objAppointment_PropertyChange(ByVal Name As String)
    Dim objRecurrencePattern As Outlook.RecurrencePattern
 
    'Change enable "Recurrence"
    If Name = "IsRecurring" Then
       If objAppointment.IsRecurring = True Then
          Set objRecurrencePattern = objAppointment.GetRecurrencePattern
          'Change the end date to 30 days from the start date
          'Alter "30" as per your needs
          objRecurrencePattern.PatternEndDate = objRecurrencePattern.PatternStartDate + 30
       End If
    End If
End Sub

3. Nazadnje kliknite makro »Application_Startup« in pritisnite »F5«.
4. Trenutno lahko ustvarite nov sestanek.
5. Nato kliknite gumb »Ponavljanje«, spremenite nastavitve ponovitve, tako da držite »Brez končnega datuma«, in kliknite »V redu«.
6. Kasneje lahko znova kliknete »Ponavljanje«, da preverite. Videli boste, da je bil končni datum spremenjen v skladu s kodo VBA.

Popravite nedostopno datoteko Outlook PST

Ste že kdaj v Outlooku prejeli sporočila o napakah, ki vključujejo "nedostopno datoteko PST"? Če ste, kako ste se spoprijeli z njimi? Morda vam je Scanpst sploh padel na pamet. Ko pa ste poskusili popraviti Outlooktudi ni uspelo. V tem primeru je vaša zadnja možnost bodisi izkušena programska oprema za obnovitev podatkov, na primer DataNumen Outlook Repair ali specializirana služba za obnovo.

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 sql popravek in obeti za popravilo programskih izdelkov. Za več informacij obiščite www.datanumen.com