Partager via


Méthode Application.MailRoutingSlip (Project)

Ajoute un bordereau de routage de message au projet actif.

Syntaxe

expression. MailRoutingSlip( _To_, _Subject_, _Body_, _AllAtOnce_, _ReturnWhenDone_, _TrackStatus_, _Clear_, _SendNow_ )

expressionUne variable qui représente un objetApplication.

Paramètres

Nom Requis/Facultatif Type de données Description
Pour Facultatif String Noms d'utilisateur des destinataires du message, séparés par des virgules.
Sujet Facultatif String Objet du message.
Corps Facultatif String Texte principal du message.
AllAtOnce Facultatif Boolean True si le message est envoyé à tous les utilisateurs en même temps. False si le message est routé d'un utilisateur à l'autre. La valeur par défaut est False.
ReturnWhenDone Facultatif Boolean True si le message revient à l'expéditeur après avoir été délivré au dernier destinataire. La valeur par défaut est True.
TrackStatus Facultatif Boolean True si l'emplacement du message est suivi. La valeur par défaut est True.
Clear Facultatif Boolean True si la liste des noms d'utilisateur affichée dans la boîte de dialogue Routing Slip est effacée. La valeur par défaut est False.
SendNow Facultatif Boolean True si le projet est envoyé. False si le bordereau du message est modifié sans envoyer le projet. La valeur par défaut est False.

Valeur renvoyée

Boolean

Remarques

L’utilisation de la méthode MailRoutingSlip sans spécifier d’argument affiche la boîte de dialogue Bordereau de routage lorsqu’un profil de courrier est défini sur le système de l’utilisateur. Si aucun profil n’est défini, l’utilisation de la méthode MailRoutingSlip sans spécification d’argument affiche l’Assistant Connexion Internet.

Exemple

L'exemple suivant montre comment envoyer les prévisions actives à Julie Rogers puis à Michael Edwards.

Sub PlanApproval() 
 MailRoutingSlip To:="Julie Rogers,Michael Edwards", _ 
 Subject:="Project Plan Approval", _ 
 Body:="Please review the following plan for approval.", _ 
 AllAtOnce:=False, ReturnWhenDone:=True, _ 
 TrackStatus:=True, SendNow:=True 
End Sub

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.