Note: The other languages of the website are Google-translated. Back to English
English English

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.

doc retarder l'envoi de la réunion 1

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

doc retarder l'envoi de la réunion 2

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 des tours 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.


Kutools for Outlook - Apporte 100 fonctionnalités avancées à Outlook et simplifie grandement le travail!

  • CC / BCC automatique par des règles lors de l'envoi d'e-mails; Transfert automatique Emails multiples par coutume; Réponse automatique sans serveur d'échange, et plus de fonctionnalités automatiques ...
  • Avertissement BCC - afficher le message lorsque vous essayez de répondre à tous si votre adresse e-mail est dans la liste BCC; Rappeler en cas de pièces jointes manquantes, et plus de fonctionnalités de rappel ...
  • Répondre (à tous) avec toutes les pièces jointes dans la conversation par courrier électronique; Répondre à de nombreux e-mails en secondes; Ajouter un message d'accueil automatique quand répondre; Ajouter la date au sujet ...
  • Outils de pièces jointes: gérer toutes les pièces jointes dans tous les courriers, Détachement automatique, Compresser tout, Tout renommer, Tout enregistrer ... Rapport rapide, Compter les courriers sélectionnésplus
  • Courriels indésirables puissants par coutume; Supprimer les messages et contacts en doubleplus Vous permettre de faire plus intelligemment, plus rapidement et mieux dans Outlook.
tir kutools outlook onglet kutools 1180x121
tir kutools outlook kutools plus onglet 1180x121
 
Commentaires (0)
Pas encore de notes. Soyez le premier à évaluer!
Il n'y a pas encore de commentaires postés ici
Laisser vos commentaires
Publier en tant qu'invité
×
Évaluez cet article:
0   Personnages
Emplacements suggérés