Propriedade Font.SubScript (Publisher)

Devolve ou define uma constante MsoTriState que indica se os carateres estão formatados como inferior à linha no intervalo de texto especificado. Leitura/gravação.

Sintaxe

expressão. Inferior à Linha

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

Valor de retorno

MsoTriState

Comentários

O valor da propriedade SubScript pode ser uma das constantes MsoTriState declaradas na biblioteca de tipos do Microsoft Office e mostradas na tabela a seguir.

Constante	Descrição
msoFalse	Nenhum dos caracteres no intervalo está formatado como subscrito.
msoTriStateMixed	Um valor devolvido que indica uma combinação de msoTrue e msoFalse para o intervalo de formas especificado.
msoTriStateToggle	Um valor definido que alterna entre msoTrue e msoFalse.
msoTrue	Nenhum dos caracteres no intervalo está formatado como subscrito.

A definição da propriedade SubScript como msoTrue remove a formatação sobrescrita do intervalo de texto.

Exemplo

Este exemplo testa o texto no segundo bloco e, se tiver uma linha inferior à linha mista, formata todo o texto como inferior à linha.

Sub SubScript() 
 
 Dim fntSS As Font 
 
 Set fntSS = Application.ActiveDocument.Stories(2).TextRange.Font 
 With fntSS 
 If .SubScript = msoTriStateMixed Then 
 .SubScript = msoTrue 
 Else 
 MsgBox "Mixed subscript not in this story." 
 End If 
 End With 
 
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.