Comment définir les événements d'une journée entière par défaut sur « Occupé » dans Outlook ?
Par défaut, Outlook définit le statut des rendez-vous et réunions sur « Occupé », mais les événements d'une journée entière sur « Libre » (voir capture d'écran ci-dessous). Vous devez manuellement changer le statut « Afficher comme » à « Occupé » chaque fois que vous créez un événement d'une journée entière. Pour changer le statut par défaut des événements d'une journée entière en « Occupé », cet article vous propose deux méthodes.

Changer le statut par défaut des événements d'une journée entière en « Occupé » en créant un formulaire personnalisé
Un formulaire personnalisé peut vous aider à créer un événement d'une journée entière avec le statut « Afficher comme » défini par défaut sur « Occupé ». Veuillez suivre les étapes ci-dessous.
1. Passez à la vue Calendrier. Cliquez sur « Accueil » > « Nouveau Rendez-vous ».
2. Dans la nouvelle fenêtre de Rendez-vous, cliquez sur « Développeur » > « Concevoir ce Formulaire ».
Remarque : Si l'onglet « Développeur » n'apparaît pas dans le ruban, veuillez suivre les méthodes décrites dans cet article pour l'afficher.

3. Ensuite, la fenêtre de rendez-vous passe en mode conception. Vous devez cliquer sur l'onglet « (P.2) ».

4. Faites glisser le champ « Événement toute la journée » et le champ « Afficher l'heure comme » depuis le volet « Sélecteur de champs » séparément vers le tableau sous l'onglet « (P.2) ».

5. Cliquez avec le bouton droit sur le champ « Événement toute la journée » déplacé et sélectionnez « Propriétés » dans le menu contextuel.

6. Dans la boîte de dialogue « Propriétés », vous devez configurer comme suit.

7. Cliquez avec le bouton droit sur la liste déroulante du champ « Afficher l'heure comme » et cliquez sur « Propriétés » dans le menu contextuel.

8. Dans la boîte de dialogue « Propriétés », vous devez configurer comme suit.

9. Cliquez sur « Publier » > « Publier le Formulaire Sous » dans le ruban.

10. Dans la boîte de dialogue « Publier le Formulaire Sous », vous devez :

11. Fermez la fenêtre de Rendez-vous sans enregistrer.
12. Dès maintenant, lorsque vous devez créer un événement d'une journée entière avec le statut « Afficher comme » défini par défaut sur « Occupé », passez à la vue « Calendrier » et cliquez sur « Accueil » > « Nouveaux Éléments » > « Formulaires Personnalisés » > « Le nom du formulaire personnalisé ».

Remarque : Pour créer un événement d'une journée entière avec le statut « Afficher comme » défini par défaut sur « Libre », procédez comme d'habitude : cliquez sur « Accueil » > « Nouveau Rendez-vous », puis cochez la case « Événement toute la journée » dans la fenêtre « Rendez-vous ».
Changer le statut par défaut des événements d'une journée entière en « Occupé » en utilisant VBA
La méthode ci-dessus comporte trop d'étapes. Si vous avez toujours besoin de créer un événement d'une journée entière avec le statut « Afficher comme » défini par défaut sur « Occupé », le code VBA suivant peut vous y aider facilement.
1. Lancez votre Outlook, appuyez simultanément sur les touches « Alt » + « F11 » pour ouvrir la fenêtre « Microsoft Visual Basic for Applications ».
2. Dans la fenêtre « Microsoft Visual Basic for Applications », double-cliquez sur « Projet1 » > « Objets Microsoft Outlook » > « ThisOutlookSession » pour ouvrir la fenêtre « ThisOutlookSession (Code) », puis copiez le code suivant dans cette fenêtre de code.

Code VBA : Définir le statut des événements d'une journée entière par défaut sur « Occupé »
Public WithEvents GInspectors As Inspectors
Public WithEvents GAppointmentItem As AppointmentItem
Private Sub Application_Startup()
'Updated by Extendoffice 20220413
Set GInspectors = Application.Inspectors
End Sub
Private Sub GInspectors_NewInspector(ByVal Inspector As Inspector)
Select Case Inspector.CurrentItem.Class
Case olAppointment
Set GAppointmentItem = Inspector.CurrentItem
End Select
End Sub
Private Sub GAppointmentItem_Open(Cancel As Boolean)
Select Case GAppointmentItem.AllDayEvent
Case True
GAppointmentItem.BusyStatus = olBusy
End Select
End Sub
Private Sub GAppointmentItem_PropertyChange(ByVal Name As String)
If Name = "AllDayEvent" Then
Select Case GAppointmentItem.AllDayEvent
Case True
GAppointmentItem.BusyStatus = olBusy
End Select
End If
End Sub
3. Enregistrez le code VBA et redémarrez Outlook.
Dès maintenant, après avoir converti un rendez-vous ou une réunion en un événement d'une journée entière, le statut « Afficher comme » sera défini par défaut sur « Occupé ».

Articles connexes
Modifier l'heure de rappel par défaut des événements d'une journée entière dans Outlook
Normalement, l'heure de rappel par défaut des événements d'une journée entière est de 18 heures dans Outlook 2007/2010 et de 0,5 jour dans Outlook 2013. Parfois, l'heure de rappel par défaut des événements d'une journée entière peut ne pas correspondre à votre emploi du temps. Nous allons ici vous présenter comment modifier l'heure de rappel par défaut des événements d'une journée entière dans Microsoft Outlook.
Modifier l'heure de suivi par défaut dans Outlook
Nous savons que lorsqu'on ajoute un rappel de suivi à un e-mail dans Outlook, l'heure de suivi par défaut est 16h30 (ou une autre heure selon vos heures de travail). Cependant, vous souhaiterez peut-être changer l'heure de suivi par défaut et être rappelé au début des heures de travail, comme 9h00. Dans cet article, je vais vous montrer comment modifier l'heure de suivi par défaut dans Outlook.
Modifier l'emplacement d'archivage par défaut dans Outlook
Par défaut, Outlook dispose d'un emplacement par défaut pour les fichiers d'archivage. Outre cet emplacement par défaut, vous pouvez définir votre propre emplacement d'archivage pour vos fichiers d'archivage. Dans ce tutoriel, nous vous montrerons comment modifier l'emplacement d'archivage par défaut dans Outlook en détail.
Modifier l'emplacement de sauvegarde des pièces jointes par défaut dans Outlook
En avez-vous assez de rechercher l'emplacement des pièces jointes que vous avez spécifié à chaque fois que vous lancez Outlook ? Dans ce tutoriel, nous vous montrerons comment modifier l'emplacement de sauvegarde des pièces jointes par défaut. Après cela, le dossier de sauvegarde des pièces jointes spécifié s'ouvrira automatiquement chaque fois que vous sauvegarderez les pièces jointes, même après avoir redémarré Outlook.
Modifier l'heure par défaut pour le délai de livraison dans Outlook
Ce tutoriel fournit un code VBA pour vous aider à modifier l'heure par défaut pour l'option de délai de livraison dans Outlook.
Meilleurs outils de productivité pour Office
Dernières nouvelles : Kutools pour Outlook lance une version gratuite !
Découvrez la toute nouvelle version GRATUITE de Kutools pour Outlook avec plus de70 fonctionnalités incroyables, à utiliser POUR TOUJOURS ! Cliquez pour télécharger maintenant !
📧 Automatisation des emails : Réponse automatique (Disponible pour POP et IMAP) / Programmation d'envoi d'emails / CC/BCC automatique par règle lors de l'envoi d'un email / Transfert automatique (Règle avancée) / Ajouter automatiquement une salutation / Diviser automatiquement les emails multi-destinataires en messages individuels...
📨 Gestion des emails : Rappeler les emails / Bloquer les emails frauduleux par sujets et autres / Supprimer les emails en double / Recherche avancée / Organiser les dossiers...
📁 Pièces jointes Pro : Enregistrement par lot / Détachement par lot / Compression par lot / Enregistrement automatique / Détachement automatique / Compression automatique...
🌟 Magie de l'interface : 😊Plus d'emojis jolis et cool / Vous rappeler lorsque des emails importants arrivent / Réduire Outlook au lieu de fermer...
👍 Merveilles en un clic : Répondre à tous avec pièces jointes / Emails anti-phishing / 🕘Afficher le fuseau horaire de l'expéditeur...
👩🏼🤝👩🏻 Contacts & Calendrier : Ajouter des contacts par lot à partir des emails sélectionnés / Diviser un groupe de contacts en groupes individuels / Supprimer le rappel d'anniversaire...

