MsoEnvelope.Introduction property (Office)

Задает или получает вводный текст, включенный в документ, отправляемый с помощью объекта MsoEnvelope . Вводный текст включается в верхней части документа в сообщении электронной почты. Для чтения и записи.

Синтаксис

expression. Введение

Выражение Переменная, представляющая объект 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

См. также

• Элементы объекта MsoEnvelope

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.