Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Establece o devuelve una constante MsoTriState que indica si los pares de caracteres de un objeto WordArt se han kerned. Lectura y escritura.
Sintaxis
expresión. KernedPairs
expresión Variable que representa un objeto TextEffectFormat .
Valor devuelto
MsoTriState
Observaciones
El valor de la propiedad KernedPairs puede ser una de las constantes MsoTriState declaradas en la biblioteca de tipos de Microsoft Office y se muestra en la siguiente tabla.
| Constante | Descripción |
|---|---|
| msoFalse | No se ha aplicado interletraje a los pares de caracteres del objeto de WordArt especificado. |
| msoTriStateToggle | Alterna entre msoTrue y msoFalse. |
| msoTrue | Se ha aplicado interletraje en los pares de caracteres del objeto de WordArt especificado. |
Ejemplo
En este ejemplo se activa el ajuste de espacios entre caracteres de todos los objetos de WordArt de la publicación activa.
Sub KernedWordArt()
Dim pagPage As Page
Dim shpShape As Shape
For Each pagPage In ActiveDocument.Pages
For Each shpShape In pagPage.Shapes
If shpShape.Type = msoTextEffect Then
shpShape.TextEffect.KernedPairs = msoTrue
End If
Next
Next
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.