Propiedad FindReplace.MatchWidth (Publisher)

Establece o devuelve un valor booleano que representa si una operación de búsqueda coincidirá con el ancho de caracteres del texto buscado. Lectura y escritura.

Sintaxis

expresión. MatchWidth

expresión Variable que representa un objeto FindReplace .

Valor devuelto

Booleano

Comentarios

Esta propiedad puede no estar disponible según el idioma habilitado en el sistema operativo. El valor predeterminado es False.

Devuelve "Acceso denegado" si un idioma del Este de Asia no está habilitado.

Ejemplo

En el ejemplo siguiente se busca cada aparición de la palabra "width" en el documento activo y se aplica formato de negrita. La propiedad MatchWidth se establece en False para que completa o caracteres de ancho medio se encontrarán. Por ejemplo, esta búsqueda aplicará formato de negrita a la palabra "width" (caracteres de ancho medio) y la palabra "w d t h" (caracteres de ancho completo).

Dim objDocument As Document 
Set objDocument = ActiveDocument 
With objDocument.Find 
 .Clear 
 .FindText = "width" 
 .MatchWidth = False 
 Do While .Execute = True 
 .FoundTextRange.Font.Bold = msoTrue 
 Loop 
End With

En el ejemplo siguiente se busca cada aparición de la palabra "width" en el documento activo y se aplica formato de negrita. La propiedad MatchWidth se establece en True para que se encontrará completa o caracteres de ancho medio. Por ejemplo, esta búsqueda aplicará formato de negrita a "width". No se aplica formato a la palabra "w d t h".

Dim objDocument As Document 
Set objDocument = ActiveDocument 
With objDocument.Find 
 .Clear 
 .FindText = "width" 
 .MatchWidth = True 
 Do While .Execute = True 
 .FoundTextRange.Font.Bold = msoTrue 
 Loop 
End With

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.