MsoEnvelope.Introduction-Eigenschaft (Office)
Legt fest oder ruft den Einführungstext ab, der in einem Dokument enthalten ist, das mithilfe des MsoEnvelope-Objekts gesendet wird. Der Einführungstext befindet sich oben im Dokument in der E-Mail. Lese-/Schreibzugriff.
Syntax
Ausdruck. Einführung
Ausdruck 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.
.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.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für