設定或取得使用 MsoEnvelope 物件傳送之文件所包含的簡介文字。 介紹性文字包含在電子郵件文件的頂部。 讀取/寫入。
語法
表達。介绍
詞 代表 MsoEnvelope 物件的變數。
範例
下列範例會將作用中的 Microsoft Word 文件以電子郵件形式傳送至您傳遞給子常式的電子郵件地址。
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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。