Evento Application.MailMergeBeforeRecordMerge (Word)
Este evento se produce al ejecutar una combinación para registros individuales.
Sintaxis
expresión. MailMergeBeforeRecordMerge (Doc, Cancel)
expresión Variable que representa un objeto Application.
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 principal de la combinación de correspondencia. |
| Cancel | Obligatorio | Boolean | True detiene el proceso de combinación de correspondencia, sólo, el registro actual antes de que se inicie. |
Ejemplo:
En este ejemplo se comprueba que la longitud del código postal, que en este ejemplo es el campo número seis, es inferior a cinco dígitos y, si es así, cancela la combinación solo para ese registro. En este ejemplo, se supone que se ha declarado una variable de aplicación denominada MailMergeApp en las declaraciones generales y que se ha establecido la variable igual al objeto Application de Microsoft Word.
Private Sub MailMergeApp_MailMergeBeforeRecordMerge(ByVal _
Doc As Document, Cancel As Boolean)
Dim intZipLength As Integer
intZipLength = Len(ActiveDocument.MailMerge _
.DataSource.DataFields(6).Value)
'Cancel merge of this record only if
'the ZIP Code is fewer than five digits
If intZipLength < 5 Then
Cancel = True
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.