Attachment-Objekt (Publisher)

Artikel
04/07/2023

Stellt eine Anlage zu einer zusammengeführten E-Mail-Nachricht dar.

HinwBemerkungeneise

Ein Attachment-Objekt entspricht einer der Anlagen in der Liste der Anlagen im Feld Anlagen im Dialogfeld Merge to Email auf der Microsoft Publisher-Benutzeroberfläche. (Zeigen Sie im Menü Datei auf Email senden, wählen Sie Email Zusammenführen senden und dann Optionen aus.)

Um die Anlage aus der zusammengeführten E-Mail zu entfernen, verwenden Sie die Delete-Methode des Attachment-Objekts .

Beispiel

Das folgende VBA-Makro (Microsoft Visual Basic for Applications) zeigt, wie Sie die Add-Methode verwenden, um einer Seriendrucknachricht eine Anlage hinzuzufügen. Es fügt der Attachments-Auflistung des aktiven Dokuments ein Attachment-Objekt hinzu, das ein Bitmapbild darstellt.

Bevor Sie dieses Makro ausführen, platzieren Sie eine Datei mit dem Namen image.bmp im Stammverzeichnis des Laufwerks C auf Ihrem Computer, oder ändern Sie den Namen und den Dateipfad der Datei im Makro, um die Datei anzugeben, die Sie anfügen möchten.

Beachten Sie, dass Sie zum Senden einer Seriendrucknachricht eine Verbindung mit einer Datenquelle herstellen, den Seriendruck erstellen und dann die Nachricht senden müssen. Weitere Informationen finden Sie im EmailMergeEnvelope-Objekt .

Public Sub Attachment_Example() 
 
 Dim pubAttachments As Publisher.Attachments 
 Dim pubAttachment As Publisher.Attachment 
 Dim pubMailMerge As Publisher.MailMerge 
 Dim pubEmailMergeEnvelope As Publisher.EmailMergeEnvelope 
 
 Set pubMailMerge = ThisDocument.MailMerge 
 Set pubEmailMergeEnvelope = pubMailMerge.EmailMergeEnvelope 
 Set pubAttachments = pubEmailMergeEnvelope.Attachments 
 
 Set pubAttachment = pubAttachments.Add("C:\image.bmp ") 
 
End Sub

Methoden

Delete

Eigenschaften

Name

Siehe auch

Referenz zum Verlegerobjektmodell

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.

Freigeben über