U Outlooku, kada omogućite „Ponavljanje“ za sastanak, prema zadanim postavkama, on će biti postavljen bez datuma završetka. Ako to želite promijeniti i postaviti zadani krajnji datum za ponavljajuće sastanke, možete koristiti metode predstavljene u ovom članku.
Kada kreirate novi sastanak i kliknete na dugme „Ponavljanje“, u iskačućem dijaloškom okviru „Ponavljanje termina“, možete videti da je „Bez datuma završetka“ izabrano kao podrazumevano, kao što je prikazano na sledećoj slici. Ako vam se ovo ne sviđa i želite da postavite zadani datum završetka, kao što je 90 dana od prvog pojavljivanja, možete čitati dalje. Ovdje ćemo vas naučiti 2 pristupa da to ostvarite.

Metoda 1: Postavljanje promjenom registra
- Za početak, idite na "Start Menu" i potražite "regedit".
- Zatim kliknite na pronađeni program “regedit”.
- Zatim će se prikazati dijaloški okvir „Kontrola korisničkog računa“ u kojem trebate kliknuti na „Da“.
- Nakon što uđete u prozor “Registry Editor”, idite na putanju – ” HKEY_CURRENT_USER\Software\Microsoft\Office\ \Outlook\Opcije\Kalendar”
- Kasnije kliknite desnim tasterom miša na “Kalendar” i odaberite “Novo” > “DWORD (32-bitna) vrijednost”.
- Nakon toga, nazovite ovu novu vrijednost kao “RecurrencesDefault”.
- Zatim dvaput kliknite na vrijednost.
- U iskačućem dijaloškom okviru „Uredi DWORD (32-bitna) vrijednost“ unesite broj u polje „Podaci o vrijednosti“. Odnosi se na broj dana od danas. Na primjer, ako je "90", Outlook će postaviti datum završetka ponavljanja na 90 dana od danas.
- Nakon toga, kliknite na "OK" i izađite iz Registry Editora ispravno.
- Na kraju, ponovo pokrenite Outlook i pokušajte kreirati ponavljajući sastanak. Njegov datum završetka bit će postavljen prema vrijednosti "RecurrencesDefault".
Metod 2: Postavite pomoću Outlook VBA
- Za početak, pokrenite Outlook VBA editor pomoću "Alt + F11".
- Zatim stavite sljedeći VBA kod u 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
- Na kraju, kliknite na makro "Application_Startup" i pritisnite "F5".
- Trenutno možete kreirati novi sastanak.
- Nakon toga, kliknite na dugme „Ponavljanje“, izmenite podešavanja ponavljanja zadržavajući „Bez datuma završetka“ i kliknite na „OK“.
- Kasnije možete ponovo kliknuti na "Ponavljanje" da provjerite. Vidjet ćete da je datum završetka promijenjen prema vašem VBA kodu.
Popravite nedostupnu Outlook PST datoteku
Jeste li ikada primili poruke o grešci koje uključuju “nedostupnu PST datoteku” u vašem Outlooku? Ako jeste, kako ste se nosili s njima? Možda vam je Scanpst uopće pao na pamet. Međutim, kada ste to pokušali popravi Outlook, i to nije uspjelo. U ovom scenariju, vaše posljednje sredstvo je ili iskusan softver za oporavak podataka kao što je DataNumen Outlook Repair ili specijalizovanu uslugu oporavka.
Uvod za autora:
Shirley Zhang je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući sql fix i Outlook softverski proizvodi za popravku. Za više informacija posjetite www.datanumen.com





