Compartir a través de


Propiedad Font.SuperScript (Publisher)

Devuelve o establece una constante MsoTriState que indica si los caracteres tienen formato de superíndice en el intervalo de texto especificado. Lectura y escritura.

Sintaxis

expresión. Superíndice

expresión Variable que representa un objeto Font .

Valor devuelto

MsoTriState

Observaciones

El valor de la propiedad SuperScript puede ser una de las constantes MsoTriState declaradas en la biblioteca de tipos de Microsoft Office y se muestra en la siguiente tabla.

Constante Descripción
msoFalse Ningún carácter del intervalo tiene el formato de superíndice.
msoTriStateMixed Valor devuelto que indica una combinación de msoTrue y msoFalse para el intervalo de formas especificado.
msoTriStateToggle Valor establecido que cambia entre msoTrue y msoFalse.
msoTrue Todos los caracteres del intervalo tienen el formato de superíndice.

Si se establece la propiedad SuperScript en msoTrue, quita el formato de subíndice del intervalo de texto.

Ejemplo

En este ejemplo se prueba el texto del segundo artículo y, si tiene superíndice mixto, se da formato a todo el texto como superíndice.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.