Propriedade Font.SuperScript (Publisher)

Retorna ou define uma constante MsoTriState indicando se os caracteres são formatados como superscript no intervalo de texto especificado. Leitura/gravação.

Sintaxe

expressão. Sobrescrito

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

Valor de retorno

MsoTriState

Comentários

O valor da propriedade SuperScript 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 caractere no intervalo é formatado como superscrito.
msoTriStateMixed	Um valor retornado 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	Todos os caracteres no intervalo são formatados como superscrito.

Definição da propriedade SuperScript como msoTrue remove a formatação de subscrito do intervalo de texto.

Exemplo

Este exemplo testa o texto na segunda história e, se ele tiver uma superscrição misturada, formata todo o texto como superscript.

Sub SuperScript() 
 
 Dim fntSuper As Font 
 
 Set fntSuper = Application.ActiveDocument.Stories(2).TextRange.Font 
 With fntSuper 
 If .SuperScript = msoTriStateMixed Then 
 .SuperScript = msoTrue 
 Else 
 MsgBox "Mixed superscript 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.