Propiedad Font.AllCaps (Publisher)

Devuelve o establece msoTrue si la fuente tiene el formato de todas las letras mayúsculas, o devuelve una de las otras constantes MsoTriState si no es así. Lectura y escritura.

Sintaxis

expresión. AllCaps

expresión Variable que representa un objeto Font .

Valor devuelto

MsoTriState

Observaciones

Al establecer la propiedad AllCaps en msoTrue , la propiedad SmallCaps se establece en msoFalse y viceversa.

El valor de la propiedad AllCaps puede ser una de las constantes MsoTriState declaradas en la biblioteca de tipos de Microsoft Office.

Ejemplo

En este ejemplo se comprueba si en el texto seleccionado del documento activo existe texto con el formato mayúsculas. Para que este ejemplo funcione, debe haber una publicación activa con texto seleccionado.

Public Sub Caps() 
 
 If Publisher.ActiveDocument.Selection _ 
 .TextRange.Font.AllCaps = msoTrue Then 
 MsgBox "Text is all caps." 
 Else 
 MsgBox "Text is not all caps." 
 End If 
 
End Sub

En este ejemplo se da el formato de mayúsculas al texto seleccionado. Para que este código se ejecute correctamente, el documento activo debe tener texto seleccionado.

Public Sub MakeCaps() 
 
 If Publisher.ActiveDocument.Selection.TextRange _ 
 .Font.AllCaps = msoFalse Then 
 Selection.TextRange.Font.AllCaps = msoTrue 
 Else 
 MsgBox "You need to select some text or it is already all caps." 
 End If 
 
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.