Comment retarder l'envoi de l'invitation à la réunion dans Outlook?
Normalement, vous pouvez appliquer la fonction de livraison différée pour envoyer un message à une heure spécifique au lieu de maintenant. Mais, parfois, vous souhaitez retarder l'envoi d'une invitation à une réunion comme un e-mail. Comment pouvez-vous envoyer une invitation à une réunion à l'heure souhaitée selon vos besoins dans Outlook?
Retarder l'envoi d'une invitation à une réunion dans Outlook avec le code VBA
Retarder l'envoi d'une invitation à une réunion dans Outlook avec le code VBA
Peut-être qu'il n'y a pas de moyen direct de retarder une invitation à une réunion dans Outlook, mais le code VBA ci-dessous peut vous rendre service, procédez comme suit:
1. Tout d'abord, vous devez créer une nouvelle tâche. Dans le nouveau Tâche fenêtre:
(1.) Spécifiez le sujet, la date de début, la date de fin de la réunion;
(2.) Définissez une date et une heure de rappel lorsque vous souhaitez envoyer l'invitation à la réunion;
(3.) Tapez le message de réunion selon vos besoins.
2. Après avoir créé la tâche, cliquez sur Sauvegarder et fermer option pour fermer cette fenêtre.
3. Ensuite, maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
4. Dans le Microsoft Visual Basic pour applications fenêtre, double-cliquez Cette session Outlook du Projet1 (VbaProject.OTM) volet pour ouvrir le mode, puis copiez et collez le code suivant dans le module vide.
Code VBA: retarder l'envoi d'une invitation à une réunion:
Private Sub Application_Reminder(ByVal Item As Object)
Dim xTaskItem As TaskItem
Dim xAppointmentItem As AppointmentItem
Dim xRcpArr() As String
If (Item.Class <> olTask) Or (LCase(Item.Subject) <> "Meeting test") Then
Exit Sub
End If
Set xTaskItem = Item
xRcpArr = VBA.Split("yy@addin99.com,sky@addin99.com,ruby@addin99.com", ",")
Set xAppointmentItem = Outlook.Application.CreateItem(olAppointmentItem)
With xAppointmentItem
.MeetingStatus = olMeeting
For i = 0 To UBound(xRcpArr)
.Recipients.Add (xRcpArr(i))
Next
.Subject = xTaskItem.Subject
.Location = "Office room 1002"
.Start = xTaskItem.StartDate + #2:00:00 PM#
.Body = xTaskItem.Body
.Duration = 120
.ReminderSet = True
.ReminderMinutesBeforeStart = 20
.Save
.Send
End With
xTaskItem.MarkComplete
Set xTaskItem = Nothing
End Sub
Notes: Dans le code ci-dessus: Test de réunion est le sujet que vous avez créé pour la réunion à l'étape 1; et, vous devez modifier les informations de adresses des destinataires, lieu de réunion, Heure de début et durée de la réunion à la vôtre
5. Enregistrez et fermez le code, puis redémarrez Outlook pour que ce code prenne effet.
6. À partir de maintenant, lorsque le rappel de l'élément de tâche apparaît à l'heure spécifique que vous avez définie, Outlook enverra automatiquement l'invitation à la réunion.
Meilleurs outils de productivité bureautique
Dernières nouvelles : lancement de Kutools pour Outlook Version gratuite!
Découvrez le tout nouveau Kutools pour Outlook Version GRATUITE avec plus de 70 fonctionnalités incroyables, à utiliser POUR TOUJOURS! Cliquez pour télécharger maintenant!
📧 Email Automation: Réponse automatique (disponible pour POP et IMAP) / Programmer l'envoi d'e-mails / Auto CC/BCC par règles lors de l'envoi d'un e-mail / Transfert automatique (règles avancées) / Ajouter un message d'accueil automatique / Divisez automatiquement les e-mails multi-destinataires en messages individuels
(I.e. Email Management: Rappel des e-mails / Bloquer les e-mails frauduleux par sujets et autres / Supprimer les e-mails en double / Recherche Avancée / Consolider les dossiers
(I.e. Pièces jointes Pro: Sauvegarde par lots / Détachement par lots / Compression par lots / Enregistrement automatique / Détachement automatique / Compression automatique
???? Magie de l'interface: 😊Plus d'émojis jolis et cool / Vous rappeler lorsque des e-mails importants arrivent / Réduire Outlook au lieu de fermer
???? Merveilles en un clic: Répondre à tous avec les pièces jointes entrantes / E-mails anti-hameçonnage / 🕘Afficher le fuseau horaire de l'expéditeur
👩🏼🤝👩🏻 Contacts et calendrier: Ajouter par lots des contacts à partir des e-mails sélectionnés / Diviser un groupe de contacts en groupes individuels / Supprimer les rappels d'anniversaire
