MailItem.Attachments-Eigenschaft (Outlook)

Gibt ein Attachments -Objekt, das alle Anlagen für das angegebene Element darstellt. Schreibgeschützt.

Syntax

Ausdruck. Attachments

Ausdruck: Eine Variable, die ein MailItem-Objekt darstellt.

Beispiel

In diesem beispiel für Visual Basic for Applications (VBA) wird die Attachments.Remove-Methode verwendet, um alle Anlagen aus einer weitergeleiteten E-Mail-Nachricht zu entfernen, bevor sie an "Dan Wilson" gesendet wird. Um dieses Beispiel auszuführen, ersetzen Sie "Dan Wilson" durch einen gültigen Empfängernamen und lassen Sie ein Element mit Anlagen in einem Inspektorfenster geöffnet.

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

Siehe auch

MailItem-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.