Méthode MailItem.Forward (Outlook)

  • Article

Exécute l’action Transférer pour un élément et retourne la copie résultante sous la forme d’un objet MailItem .

Syntaxe

expression. Forward

expression Variable qui représente un objet MailItem.

Valeur renvoyée

Objet MailItem qui représente le nouvel élément de messagerie.

Exemple

Cet exemple Visual Basic pour Applications (VBA) utilise la méthode Remove pour supprimer toutes les pièces jointes d’un message transféré avant de l’envoyer à Dan Wilson. Pour exécuter cet exemple, remplacez « Dan Wilson » par un nom de destinataire valide et conservez un élément de courrier contenant au moins une pièce jointe dans la fenêtre active.

Sub RemoveAttachmentBeforeForwarding() 
 
 Dim myinspector As Outlook.Inspector 
 
 Dim myItem As Outlook.MailItem 
 
 Dim myattachments As Outlook.Attachments 
 
 
 
 Set myinspector = Application.ActiveInspector 
 
 If Not TypeName(myinspector) = "Nothing" Then 
 
 Set myItem = myinspector.CurrentItem.Forward 
 
 Set myattachments = myItem.Attachments 
 
 While myattachments.Count > 0 
 
 myattachments.Remove 1 
 
 Wend 
 
 myItem.Display 
 
 myItem.Recipients.Add "Dan Wilson" 
 
 myItem.Send 
 
 Else 
 
 MsgBox "There is no active inspector." 
 
 End If 
 
End Sub

Voir aussi

Objet MailItem

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.