2 méthodes pour définir la date de fin par défaut des rendez-vous Outlook récurrents

Dans Outlook, lorsque vous activez "Récurrence" pour un rendez-vous, par défaut, il sera défini sans date de fin. Si vous souhaitez le modifier et définir une date de fin par défaut pour les rendez-vous récurrents, vous pouvez utiliser les méthodes présentées dans cet article.

Lorsque vous créez un nouveau rendez-vous et cliquez sur le bouton "Périodicité", dans la boîte de dialogue contextuelle "Périodicité du rendez-vous", vous pouvez voir que "Aucune date de fin" est sélectionné par défaut, comme illustré dans la figure suivante. Si vous n'aimez pas cela et souhaitez définir une date de fin par défaut, telle que 90 jours à compter de la première occurrence, vous pouvez continuer à lire. Ici, nous allons vous apprendre 2 approches pour le réaliser.

Méthode 1 : définir en modifiant le registre

1. Pour commencer, allez dans le « menu Démarrer » et recherchez « regedit ».
2. Ensuite, cliquez sur le programme "regedit" trouvé.
3. Ensuite, la boîte de dialogue "Contrôle de compte d'utilisateur" s'affichera, dans laquelle vous devrez cliquer sur "Oui".
4. Après être entré dans la fenêtre "Registry Editor", accédez au chemin - " HKEY_CURRENT_USER\Software\Microsoft\Office\ \Outlook\Options\Calendrier"
5. Plus tard, faites un clic droit sur "Calendrier" et choisissez "Nouveau"> "Valeur DWORD (32 bits)".
6. Ensuite, nommez cette nouvelle valeur « RecurrencesDefault ».
7. Ensuite, double-cliquez sur la valeur.
8. Dans la boîte de dialogue contextuelle "Modifier la valeur DWORD (32 bits)", saisissez un nombre dans le champ "Données de la valeur". Il se réfère au décompte des jours à partir d'aujourd'hui. Par exemple, si c'est « 90 », Outlook définira la date de fin de la récurrence à 90 jours à compter d'aujourd'hui.
9. Ensuite, cliquez sur "OK" et quittez correctement l'Éditeur du Registre.
10. Enfin, redémarrez Outlook et essayez de créer un rendez-vous récurrent. Sa date de fin sera définie selon la valeur « RecurrencesDefault ».

Méthode 2 : Définir avec Outlook VBA

1. Pour commencer, ouvrez l'éditeur VBA d'Outlook en appuyant sur « Alt + F11 ».
2. Ensuite, placez le code VBA suivant dans le projet "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. Enfin, cliquez dans la macro « Application_Startup » et appuyez sur « F5 ».
4. À l'heure actuelle, vous pouvez créer un nouveau rendez-vous.
5. Ensuite, cliquez sur le bouton "Récurrence", modifiez les paramètres de récurrence en gardant "Aucune date de fin", puis cliquez sur "OK".
6. Plus tard, vous pouvez re-cliquer sur "Récurrence" pour vérifier. Vous verrez que la date de fin a été modifiée conformément à votre code VBA.

Réparer le fichier Outlook PST inaccessible

Avez-vous déjà reçu des messages d'erreur impliquant un "fichier PST inaccessible" dans votre Outlook ? Si oui, comment les avez-vous traités ? Peut-être que Scanpst vous est venu à l'esprit en premier lieu. Cependant, lorsque vous l'avez essayé de réparer Outlook, il a échoué aussi. Dans ce scénario, votre dernier recours est soit un logiciel de récupération de données expérimenté comme DataNumen Outlook Repair ou un service de récupération spécialisé.

Introduction de l'auteur:

Shirley Zhang est une experte en récupération de données dans DataNumen, Inc., qui est le leader mondial des technologies de récupération de données, y compris correction sql et produits logiciels de réparation Outlook. Pour plus d'informations, visitez www.datanumen.com