Propriedade Font.Subscript (Word)

True se a fonte estiver formatada como subscrito. Long de leitura/gravação.

Sintaxe

expressão. Subscrito

Expressão Uma expressão que retorna um objeto Font .

Comentários

Retorna True, False ou wdUndefined (uma mistura de True e False). Pode ser definido como True, False ou wdToggle.

A definição da propriedade Subscript como True define a propriedade Superscript como False e vice-versa.

Exemplo

Este exemplo insere texto no início do documento ativo e formata o nono caractere como subscrito.

Set myRange = ActiveDocument.Range(Start:=0, End:=0) 
myRange.InsertAfter "Water = H20" 
myRange.Characters(10).Font.Subscript = True

Este exemplo verifica se há formatação em subscrito no texto selecionado.

If Selection.Type = wdSelectionNormal Then 
 mySel = Selection.Font.Subscript 
 If mySel = wdUndefined Or mySel = True Then 
 MsgBox "Subscript text exists in the selection." 
 Else 
 MsgBox "No subscript text in the selection." 
 End If 
Else 
 MsgBox "You need to select some text." 
End If

Confira também

Objeto Font

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.