Méthode Attachments.Remove (Outlook)

  • Article

Supprime un objet de la collection.

Syntaxe

expression. Remove (Index)

Expression Variable qui représente un objet Attachments .

Parameters

Nom Requis/Facultatif Type de données Description
Index Obligatoire Long Valeur d'index à base 1 de l'objet dans la collection.

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. Avant d'exécuter cet exemple, remplacez « Dan Wilson » par un nom de destinataire valide.

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

Attachments, objet

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.