Événement Application.EPostageInsertEx (Word)
Intervient lorsqu'un utilisateur insère un affranchissement électronique dans un document.
Syntaxe
expression. EPostageInsertEx( _Doc_ , _cpDeliveryAddrStart_ , _cpDeliveryAddrEnd_ , _cpReturnAddrStart_ , _cpReturnAddrEnd_ , _xaWidth_ , _yaHeight_ , _bstrPrinterName_ , _bstrPaperFeed_ , _fPrint_ , _fCancel_ )
Expression Variable qui représente un objet « Application » qui a été déclaré avec des événements dans un module de classe. Pour plus d’informations sur l’utilisation d’événements avec l’objet Application , consultez Utilisation d’événements avec l’objet Application.
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Doc | Obligatoire | Document | Document auquel l'affranchissement électronique est ajouté. |
| cpDeliveryAddrStart | Obligatoire | Entier long | La position de départ de l'adresse du destinataire dans le document. Le positionnement correspond à la valeur de la propriété Start d'un objet Range. |
| cpDeliveryAddrEnd | Obligatoire | Entier long | Fin de l'adresse du destinataire dans le document. Le positionnement correspond à la valeur de la propriété End d'un objet Range. |
| cpReturnAddrStart | Obligatoire | Entier long | La position de départ de l'adresse de l'expéditeur dans le document. Le positionnement correspond à la valeur de la propriété Start d'un objet Range. |
| cpReturnAddrEnd | Obligatoire | Entier long | Fin de l'adresse de l'expéditeur dans le document. Le positionnement correspond à la valeur de la propriété End d'un objet Range. |
| xaWidth | Obligatoire | Entier long | Largeur de l'enveloppe en unités de 1/1440 pouce (twip). |
| yaHeight | Obligatoire | Entier long | Hauteur de l'enveloppe en unités de 1/1440 pouce (twip). |
| bstrPrinterName | Obligatoire | Chaîne | Nom de l'imprimante spécifié dans l'onglet Options d'impression de la boîte de dialogue Options d'enveloppe. |
| bstrPaperFeed | Obligatoire | Chaîne | Méthode d'alimentation spécifiée dans l'onglet Options d'impression de la boîte de dialogue Options d'enveloppe. |
| fPrint | Obligatoire | Booléen | True si l'utilisateur a choisi d'imprimer l'enveloppe. False si l'utilisateur a spécifié d'insérer l'enveloppe dans le document. |
| fCancel | Obligatoire | Booléen | True annule l'insertion de l'affranchissement. |
Exemple
L'exemple suivant affiche un message à l'utilisateur. Si l'utilisateur annule le message, l'action indiquée par l'utilisateur est alors annulée.
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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.