Propriedade Font.AllCaps (Publisher)

Devolve ou define msoTrue se o tipo de letra estiver formatado como todas as letras maiúsculas ou devolver uma das outras constantes msoTriState se não estiver. Leitura/gravação.

Sintaxe

expressão. AllCaps

expressão Uma variável que representa um objeto Tipo de Letra .

Valor de retorno

MsoTriState

Comentários

Definir a propriedade AllCaps como msoTrue define a propriedade SmallCaps como msoFalse e vice-versa.

O valor da propriedade AllCaps pode ser uma das constantes msoTriState declaradas na biblioteca de tipos do Microsoft Office.

Exemplo

Este exemplo verifica o texto selecionado no documento ativo para ver se há texto formatado com todas letras maiúsculas. Para que este exemplo funcione, tem de existir uma publicação ativa com texto selecionado.

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

Este exemplo formata o texto selecionado com todas letras maiúsculas. Para que este código seja executado adequadamente, um documento ativo precisa existir com o texto selecionado.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.