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

Статья
04/07/2023

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

Синтаксис

выражение. 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 и обратная связь.

Поделиться через