Attachments.Add-Methode (Publisher)

Fügt der Attachments-Auflistung einer Microsoft Publisher-Publikation ein Attachment-Objekt hinzu.

Syntax

Ausdruck. Hinzufügen (FileName)

Ausdruck Eine Variable, die ein Attachments-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
FileName	Erforderlich	String	Dateiname der Anlage

Rückgabewert

Attachment

Beispiel

Das folgende VBA-Makro (Microsoft Visual Basic for Applications) zeigt, wie Sie der Nachricht in einem Seriendruck eine Anlage hinzufügen. Der Code fügt einer E-Mail-Nachricht eine Anlage hinzu und gibt dann die Anzahl der aktuellen Anlagen an die Nachricht im Direktfenster aus.

Die Anlage in diesem Beispiel ist eine Bilddatei im Stammverzeichnis des Laufwerks C:. Ersetzen Sie vor dem Ausführen des Codes "C:\image.jpg" durch den Pfad zu und den Namen der Datei auf Ihrem Computer, die Sie als E-Mail-Anlage hinzufügen möchten.

Bevor Sie einen Seriendruck erstellen können, müssen Sie die OpenDataSource-Methode des MailMerge-Objekts verwenden, um das aktive Dokument mit einer Datenquelle zu verbinden. Führen Sie den Seriendruck mit der Execute -Methode des MailMerge -Objekts.

Ein Beispiel für das Herstellen einer Verbindung mit einer Datenquelle und das Erstellen eines E-Mail-Seriendrucks finden Sie im EmailMergeEnvelope-Objekt .

Public Sub Add_Example() 
 
 Dim pubAttachment As Publisher.Attachment 
 
 Set pubAttachment = ThisDocument.MailMerge.EmailMergeEnvelope.Attachments.Add("C:\image.jpg") 
 Debug.Print ThisDocument.MailMerge.EmailMergeEnvelope.Attachments.Count 
 
End Sub

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.