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

Comment transférer automatiquement les invitations à une réunion à une personne spécifique dans Outlook? 

Dans Outlook, vous pouvez transférer une invitation à une réunion à une personne spécifique directement à l'aide de la fonctionnalité Transférer manuellement. Mais, parfois, vous devrez peut-être transférer automatiquement les invitations à une réunion à une personne spécifique lorsque vous acceptez la réunion. Dans cet article, je vais expliquer comment transférer automatiquement une invitation à une réunion à une personne aussi rapidement que possible.

Transférer automatiquement les invitations à une réunion à une personne spécifique dans Outlook avec le code VBA


Transférer automatiquement les invitations à une réunion à une personne spécifique dans Outlook avec le code VBA

Voici un code VBA utile qui peut vous aider à transférer automatiquement l'invitation à la réunion à une personne spécifique après l'avoir acceptée, procédez comme suit:

1. Maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. 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: transfert automatique des invitations à une réunion à une personne spécifique:

Public WithEvents ReceivedItems As Outlook.Items
Private Sub Application_Startup()
    Set ReceivedItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub ReceivedItems_ItemAdd(ByVal Item As Object)
Dim xMeetingItem As MeetingItem
Dim xMeetingResponse As MeetingItem
Dim xForwardMeeting As MeetingItem
Dim xAppointmentItem As AppointmentItem
On Error Resume Next
If TypeOf Item Is MeetingItem Then
    Set xMeetingItem = Item
    Set xAppointmentItem = xMeetingItem.GetAssociatedAppointment(True)
    Set xMeetingResponse = xAppointmentItem.Respond(olMeetingAccepted, True)
    xMeetingResponse.Send
    Set xForwardMeeting = xMeetingItem.Forward
    With xForwardMeeting
        With .Recipients
            .Add "skyyang@addin88.com" 'change address to your own
            .ResolveAll
        End With
        .Send
    End With
End If
End Sub

Notes: Dans le code ci-dessus, vous devez remplacer l'adresse du destinataire par la vôtre.

doc retransmission automatique de la réunion 1

3. Enregistrez ensuite le code et redémarrez Outlook pour prendre l'effet de code.

4. Désormais, lorsque vous recevez une invitation à une réunion, la réunion sera acceptée automatiquement, et en même temps, cette réunion sera automatiquement transférée à votre personne spécifique immédiatement.

Notes: Ce code n'est disponible que pour le compte par défaut.


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 (1)
Pas encore de notes. Soyez le premier à évaluer!
Ce commentaire a été minimisé par le modérateur sur le site
Ótimo code !
Mas como faço para, em vez de aceitar os convites automaticamente e os encamilha-los, encaminhar para outro e-mail apenas os que eu aceitei (os que eu não aceitar ele ignora) ?
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