Событие Application.EPostageInsertEx (Word)

  • Статья

Происходит, когда пользователь вставляет электронную почту в документ.

Синтаксис

выражение. EPostageInsertEx( _Doc_ , _cpDeliveryAddrStart_ , _cpDeliveryAddrEnd_ , _cpReturnAddrStart_ , _cpReturnAddrEnd_ , _xaWidth_ , _yaHeight_ , _bstrPrinterName_ , _bstrPaperFeed_ , _fPrint_ , _fCancel_ )

Выражение Переменная, представляющая объект Application, объявленный с событиями в модуле класса. Сведения об использовании событий с объектом Application см. в разделе Использование событий с объектом Application.

Параметры

Имя Обязательный или необязательный Тип данных Описание
Док Обязательный Документ Документ, к которому добавляется электронная почтовая почта.
cpDeliveryAddrStart Обязательный Long Начальная позиция в документе для адреса доставки. Позиционирование соответствует значению свойства Start для объекта Range .
cpDeliveryAddrEnd Обязательный Long Конечная позиция в документе для адреса доставки. Позиционирование соответствует значению свойства End для объекта Range .
cpReturnAddrStart Обязательный Long Начальная позиция в документе для возвращаемого адреса. Позиционирование соответствует значению свойства Start для объекта Range .
cpReturnAddrEnd Обязательный Long Конечная позиция в документе для возвращаемого адреса. Позиционирование соответствует значению свойства End для объекта Range .
xaWidth Обязательный Long Ширина конверта в 1/1440 дюймов единиц.
yaHeight Обязательный Long Высота конверта в 1/1440 дюйма.
bstrPrinterName Обязательный String Имя принтера, указанное на вкладке Параметры печати диалогового окна Параметры конверта .
bstrPaperFeed Обязательный String Метод веб-канала, указанный на вкладке Параметры печати диалогового окна Параметры конверта .
fPrint Обязательный Boolean Значение true , если пользователь указал на печать конверта. Значение false , если пользователь указал, чтобы вставить конверт в документ.
fCancel Обязательный Boolean Значение True отменяет вставку почты.

Пример

В следующем примере отображается сообщение для пользователя. Если пользователь отменяет сообщение, действие, указанное пользователем, отменяется.

Private Sub App_EPostageInsertEx(ByVal Doc As Document, ByVal cpDeliveryAddrStart As Long, _ 
 ByVal cpDeliveryAddrEnd As Long, ByVal cpReturnAddrStart As Long, _ 
 ByVal cpReturnAddrEnd As Long, ByVal xaWidth As Long, ByVal yaHeight As Long, _ 
 ByVal bstrPrinterName As String, ByVal bstrPaperFeed As String, _ 
 ByVal fPrint As Boolean, fCancel As Boolean) 
 
 Dim intResponse As Integer 
 
 If fPrint = True Then 
 intResponse = MsgBox("Make sure the printer is ready to print an envelope." & vbCrLf & _ 
 "When the printer is ready, click OK.", vbOKCancel) 
 
 If intResponse = vbCancel Then 
 fCancel = True 
 End If 
 End If 
End Sub

См. также

Объект Application

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

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