Når du aktiverer "Gentagelse" for en aftale i Outlook, vil den som standard blive indstillet uden slutdato. Hvis du vil ændre det og indstille en standard slutdato for tilbagevendende aftaler, kan du bruge metoderne introduceret i denne artikel.
Når du opretter en ny aftale og klikker på "Gentagelse" -knappen, i pop op-dialogboksen "Aftalens gentagelse", kan du se, at "Ingen slutdato" er valgt som standard, som vist i den følgende figur. Hvis du ikke kan lide dette og ønsker at indstille en standard slutdato, f.eks. 90 dage fra den første forekomst, kan du læse videre. Her lærer vi dig to tilgange til at realisere det.

Metode 1: Indstil ved at ændre registreringsdatabasen
- For at starte skal du gå til "Startmenuen" og søge efter "regedit".
- Klik derefter på det fundne "regedit" -program.
- Derefter vises dialogboksen "Brugerkontokontrol", hvor du skal klikke på "Ja".
- Efter at komme ind i "Registreringseditor" -vinduet, naviger til stien - "HKEY_CURRENT_USER \ Software \ Microsoft \ Office \ \ Outlook \ Indstillinger \ Kalender ”
- Senere skal du højreklikke på "Kalender" og vælge "Ny"> "DWORD (32-bit) værdi".
- Navngiv derefter denne nye værdi som “RecurrencesDefault”.
- Dobbeltklik derefter på værdien.
- Indtast et nummer i dialogboksen "Rediger DWORD (32-bit) værdi" i popup-feltet "Værdidata". Det refererer til antallet af dage fra i dag. For eksempel, hvis det er "90", vil Outlook indstille slutdatoen for gentagelse til 90 dage fra i dag.
- Klik derefter på “OK” og afslut registreringseditor korrekt.
- Genstart til sidst din Outlook og prøv at oprette en tilbagevendende aftale. Dens slutdato vil blive indstillet i henhold til værdien "RecurrencesDefault".
Metode 2: Indstil med Outlook VBA
- Til at starte med skal du aktivere Outlook VBA-editoren ved at bruge “Alt + F11”.
- Sæt derefter følgende VBA-kode i “ThisOutlookSession” -projektet.
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
- Til sidst skal du klikke på makroen "Application_Startup" og trykke på "F5".
- På nuværende tidspunkt kan du oprette en ny aftale.
- Klik derefter på knappen "Gentagelse", rediger indstillingerne for gentagelse med "Ingen slutdato" og klik på "OK".
- Senere kan du klikke igen på "Gentagelse" for at kontrollere. Du vil se, at slutdatoen er ændret i henhold til din VBA-kode.
Ret utilgængelig Outlook PST-fil
Har du nogensinde modtaget nogen fejlmeddelelser, der involverer "utilgængelig PST-fil" i din Outlook? Hvis du har, hvordan håndterede du dem? Måske skete Scanpst i dit sind i første omgang. Men når du prøvede det rette Outlook, det mislykkedes også. I dette scenarie er din sidste udvej enten erfaren datagendannelsessoftware som DataNumen Outlook Repair eller specialiseret genopretningstjeneste.
Forfatter Introduktion:
Shirley Zhang er ekspert i datagendannelse i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder sql rettelse og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com





