Evento Application.EPostageInsertEx (Word)
Este evento se produce cuando un usuario inserta franqueo electrónico en un documento.
Sintaxis
expresión. EPostageInsertEx( _Doc_ , _cpDeliveryAddrStart_ , _cpDeliveryAddrEnd_ , _cpReturnAddrStart_ , _cpReturnAddrEnd_ , _xaWidth_ , _yaHeight_ , _bstrPrinterName_ , _bstrPaperFeed_ , _fPrint_ , _fCancel_ )
Expresión Variable que representa un objeto "Application" que se ha declarado con eventos en un módulo de clase. Para obtener información sobre el uso de eventos con el objeto Application , consulte Uso de eventos con el objeto Application.
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Doc | Obligatorio | Document | Documento al que se agrega el franqueo electrónico. |
| cpDeliveryAddrStart | Obligatorio | Long | La posición inicial del documento para la dirección de entrega. La posición corresponde al valor de la propiedad Start de un objeto Range. |
| cpDeliveryAddrEnd | Obligatorio | Long | La posición final del documento para la dirección de entrega. La posición corresponde al valor de la propiedad End de un objeto Range. |
| cpReturnAddrStart | Obligatorio | Long | La posición inicial del documento para el remite. La posición corresponde al valor de la propiedad Start de un objeto Range. |
| cpReturnAddrEnd | Obligatorio | Long | La posición final del documento para el remite. La posición corresponde al valor de la propiedad End de un objeto Range. |
| xaWidth | Obligatorio | Long | Ancho del sobre en unidades de 1/1440 pulgadas (0,017 mm). |
| yaHeight | Obligatorio | Long | Alto del sobre en unidades de 1/1440 pulgadas (0,017 mm). |
| bstrPrinterName | Obligatorio | String | Nombre de la impresora tal como aparece en la ficha Opciones de impresión en el cuadro de diálogo Opciones de sobre. |
| bstrPaperFeed | Obligatorio | String | Método de alimentación tal como aparece en la ficha Opciones de impresión en el cuadro de diálogo Opciones de sobre. |
| fPrint | Obligatorio | Boolean | True si el usuario ha especificado para imprimir el sobre. False si el usuario especificó insertar el sobre en el documento. |
| fCancel | Obligatorio | Boolean | True cancela la inserción del franqueo. |
Ejemplo:
El ejemplo siguiente muestra un mensaje al usuario. Si éste cancela el mensaje, se cancelará la acción que haya especificado.
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
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.