Propriedade Font.AllCaps (Publisher)

Retorna ou define msoTrue se a fonte estiver formatada com todas as letras maiúsculas ou retorna uma das outras constantes MsoTriState se não estiver. Leitura/gravação.

Sintaxe

mais simples. AllCaps

expressão Uma variável que representa um objeto Font .

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 esse exemplo funcione, deve haver uma publicação ativa com o 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.