MsoEnvelope.Item-Eigenschaft (Office)
Ruft ein MailItem-Objekt ab, das zum Senden des Dokuments als E-Mail verwendet werden kann. Schreibgeschützt.
Syntax
Ausdruck. Artikel
Ausdruck: Erforderlich. Eine Variable, die ein MsoEnvelope-Objekt darstellt.
Beispiel
Im folgenden Beispiel wird das aktive Microsoft Word-Dokument als E-Mail an die E-Mail-Adresse gesendet, die Sie an die Unterroutine übergeben.
Sub SendMail(ByVal strRecipient As String)
'Use a With...End With block to reference the msoEnvelope object.
With Application.ActiveDocument.MailEnvelope
'Add some introductory text before the body of the email message.
.Introduction = "Please read this and send me your comments."
'Return a MailItem object that you can use to send the document.
With .Item
'All of the mail item settings are saved with the document.
'When you add a recipient to the Recipients collection
'or change other properties these settings will persist.
.Recipients.Add strRecipient
.Subject = "Here is the document."
'The body of this message will be
'the content of the active document.
.Send
End With
End With
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.