Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Die Auflistung der Anlagenobjekte , die alle Anlagen einer Seriendruck-E-Mail-Nachricht darstellt.
Hinweise
Die Anlagensammlung entspricht der Liste der Anlagen im Feld Anlagen im Dialogfeld Seriendruck an E-Mail in der Microsoft Publisher-Benutzeroberfläche (zeigen Sie im Menü Datei auf E-Mail senden, wählen Sie E-Mail senden und dann Optionen aus).
Um der Attachments-Auflistung ein Attachment-Objekt hinzuzufügen und dadurch der Liste der Anlagen der Seriendruck-E-Mail, die Sie senden möchten, eine Anlage hinzuzufügen, verwenden Sie die Add-Methode.
Wenn Sie eine einzelne Anlage aus einer Seriendrucknachricht entfernen möchten, verwenden Sie die Delete-Methode des jeweiligen Anlagenobjekts , das Sie aus der Anlagenauflistung entfernen möchten.
Um alle Anlagen der zusammengeführten E-Mail zu entfernen und dadurch die Anlagenauflistung zu leeren, verwenden Sie die ClearAll-Methode .
Die Standardeigenschaft der Attachments -Auflistung ist die Item -Eigenschaft.
Beispiel
Das folgende Microsoft Visual Basic for Applications (VBA)-Makro zeigt, wie Sie die Add-Methode verwenden, um einer Seriendrucknachricht eine Anlage hinzuzufügen. Das Makro fügt ein Attachment -Objekt, das eine Bitmapgrafik zur Attachments -Auflistung des aktiven Dokuments darstellt. Auch der Attachments -Auflistung durchlaufen, und druckt den Namen aller Anlagen in das Direktfenster.
Platzieren Sie vor dem Ausführen dieses Makros eine Datei mit dem Namen image.bmp im Stammverzeichnis des Laufwerks C auf Ihrem Computer, oder ändern Sie den Namen und Pfad der Datei im Makro, um die anzufügende Datei anzugeben.
Wenn Sie eine Seriendrucknachricht senden möchten, müssen Sie eine Verbindung mit einer Datenquelle herstellen, den Seriendruck erstellen und dann die Nachricht senden. Weitere Informationen finden Sie unter dem EmailMergeEnvelope-Objekt .
Public Sub Attachments_Example()
Dim pubAttachments As Publisher.Attachments
Dim pubAttachment As Publisher.Attachment
Dim pubAttachment_Added 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_Added = pubAttachments.Add("C:\image.bmp ")
For Each pubAttachment In pubAttachments
Debug.Print pubAttachment.Name
Next
End Sub
Methoden
Eigenschaften
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.