Propiedad Font.SizeBi (Publisher)

Devuelve o establece un valor Variant que representa el tamaño, en puntos, del objeto Font para texto en un idioma de derecha a izquierda. Intervalo válido es de 0,5 puntos a 999,5 puntos. Lectura y escritura.

Sintaxis

expresión. SizeBi

expresión Variable que representa un objeto Font .

Valor devuelto

Variant

Ejemplo

En este ejemplo se realiza una prueba en el texto del segundo artículo. Si se trata de un idioma que se escribe de derecha a izquierda, con una fuente superior a 12 puntos y en cursiva, el texto se establece en negrita.

Sub SizeBiIfBig() 
 
 Dim fntSize As Font 
 
 Set fntSize = Application.ActiveDocument.Stories(2).TextRange.Font 
 With fntSize 
 If .SizeBi > 12 And .ItalicBi = msoTrue Then 
 .BoldBi = msoTrue 
 Else 
 MsgBox "The font size is 12 points or less " & _ 
 ", not bold, or this is not in a right-to-left language." 
 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.