Application.MailMergeInsertBarcode event (Publisher)

Se produce cuando el usuario emite el comando para insertar códigos de barras postales en una publicación de combinación de correspondencia, en la interfaz de usuario de Microsoft Publisher o mediante programación.

Sintaxis

más sencilla.MailMergeInsertBarcode (Doc, OkToInsert)

expresión Variable que representa un objeto Application.

Parámetros

Nombre Obligatorio/opcional Tipo de datos Descripción
Doc Obligatorio Document La publicación actual.
OkToInsert Obligatorio Boolean Parámetro de salida. True si se puede insertar códigos de barras.

Comentarios

Use el método TextRange.InsertBarcode para insertar códigos de barras en una publicación de combinación de correspondencia.

Complementos de terceros que validar direcciones de correspondencia pueden utilizar el evento MailMergeInsertBarcode para escuchar las acciones del usuario que solicita que códigos de barras se va a insertar. En esta situación, cuando el complemento recibe una notificación de que se activó el evento MailMergeInsertBarcode , comprueba la validez de las direcciones en la lista de combinación de correspondencia y, si son válidas, intenta generar códigos de barras. Si este intento tiene éxito, el complemento debe devolver True para el parámetro OkToInsert . Si se produce un error en el intento, el complemento debería devolver False.

El evento MailMergeGenerateBarcode proporciona datos del código de barras real a Publisher.

El evento MailMergeInsertBarcode también se desencadena cuando un usuario elige Agregar un código de barras postal en el panel de tareas Combinación de correspondencia o Combinación de catálogos , o bien Agregar códigos de barras en el panel de tareas de Publisher en la interfaz de usuario de Publisher. Para que un usuario pueda elegir cualquiera de estos comandos de interfaz de usuario, primero debe ponerlos a disposición estableciendo la propiedad InsertBarcodeVisible en True.

Para obtener más información acerca del uso de eventos con el objeto Application , vea Utilizar eventos con el objeto Application.

Ejemplo

El siguiente ejemplo de Microsoft Visual Basic para aplicaciones (VBA) muestra cómo controlar el evento MailMergeInsertBarcode. Se muestra un mensaje que pregunta si desea continuar con la inserción de códigos de barras.

Private Sub pubApplication_MailMergeInsertBarcode(ByVal Doc As Document, OkToInsert As Boolean) 
 
 Dim intResponse As Integer 
 
 intResponse = MsgBox("Proceed to insert barcodes?", vbYesNo) 
 
 If intResponse = vbYes Then OkToInsert = True 
 
End Sub

Para que este evento ocurra, debe colocar la siguiente línea de código en la sección Declaraciones generales del módulo.

Public WithEvents pubApplication As Application

A continuación, debe ejecutar el siguiente procedimiento de inicialización.

Public Sub Initialize_pubApplication() 
 Set pubApplication = Publisher.Application 
End Sub

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.