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
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.