Evento Application.MailMergeGenerateBarcode (Publisher)

Se produce cuando Microsoft Publisher requiere datos para generar códigos de barras en una publicación de combinación de correspondencia, en particular, cuando cambia la lista de destinatarios de combinación de correspondencia.

Sintaxis

expresión. MailMergeGenerateBarcode (Doc, bstrString)

expresión Variable que representa un objeto Application.

Parámetros

Observaciones

Complementos de terceros que validar direcciones de correspondencia pueden utilizar el evento MailMergeGenerateBarcode para escuchar las acciones del usuario que solicita que códigos de barras se va a generar. En esta situación, cuando el complemento recibe una notificación que desencadenó el evento MailMergeGenerateBarcode, y si el documento activo está conectado a un origen de datos, el complemento puede usar la propiedad MailMergeDataSource.ActiveRecord para determinar el registro para el que se va a generar el código de barras. Si el documento activo no está conectado a un origen de datos, el complemento utiliza el texto de la dirección directamente.

Si el complemento puede usar el texto de dirección directamente, devuelve una representación de cadena del código de barras para el parámetro de salida bstrString . Si el complemento no puede usar el texto de dirección directamente, devuelve una cadena vacía.

Para permitir el desencadenamiento del evento MailMergeGenerateBarcode , debe controlar el evento MailMergeInsertBarcode en el código y el complemento debe establecer el parámetro OkToInsert pasado a ese evento en True.

Para obtener más información sobre el uso de eventos con el objeto Application , consulte Uso de eventos con el objeto Application.

Ejemplo

El siguiente ejemplo de Microsoft Visual Basic para aplicaciones (VBA) muestra cómo controlar el evento MailMergeGenerateBarcode. Devuelve la cadena que representa el código de barras del registro activo. Tenga en cuenta que la variable indexNumberOfBarcodeColumn representa el número de índice de la columna del origen de datos que enumera los códigos de barras. Este código supone que la publicación actual está conectada a un origen de datos.

Private Sub pubApplication_MailMergeGenerateBarcode(ByVal Doc As Document, bstrString As String) 
 bstrString = pubApplication.ActiveDocument.MailMerge.DataSource.DataFields.Item(indexNumberOfBarcodeColumn).Value 
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.