Méthode Attachments.Remove (Outlook)
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
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.