Clase ChartFont (Word VBA)

Contiene los atributos de fuente (nombre, tamaño, color, etc.) de un gráfico de objetos.

Set

Para usar una variable de clase ChartFont, primero debe ser instanciado, por ejemplo

Dim cft as ChartFont
Set cft = ActiveDocument.Background.Chart.DataTable.Font

Los siguientes procedimientos se pueden usar para establecer variables de clase ChartFont : ChartCharacters.Font, DataTable.Font, LegendEntry.Font y TickLabels.Font

Propiedades

Background Devuelve o establece el tipo de fondo para el texto usado en los gráficos.

ActiveDocument.Background.Chart.DataTable.Font.Background = xlBackgroundAutomatic

Bold True si la fuente está en negrita.

ActiveDocument.Background.Chart.DataTable.Font.Bold = True

Color Devuelve o establece el color principal del objeto.

ActiveDocument.Background.Chart.DataTable.Font.Color = RGB(0,0,255)'blue

ColorIndex Devuelve o establece el color de la fuente.

ActiveDocument.Background.Chart.DataTable.Font.ColorIndex =

FontStyle Devuelve o establece el estilo de fuente.

ActiveDocument.Background.Chart.DataTable.Font.FontStyle =

Italic True si el estilo de fuente es cursiva.

ActiveDocument.Background.Chart.DataTable.Font.Italic = True

Name Devuelve o establece el nombre del objeto.

ActiveDocument.Background.Chart.DataTable.Font.Name =

Parent Devuelve al objeto primario del objeto especificado.

Dim objParent As Object
Set objParent = ActiveDocument.Background.Chart.DataTable.Font.Parent

Size Devuelve o establece el tamaño de la fuente.

ActiveDocument.Background.Chart.DataTable.Font.Size =

StrikeThrough True si la fuente está tachada con una línea horizontal.

ActiveDocument.Background.Chart.DataTable.Font.StrikeThrough = True

Subscript True si la fuente tiene el formato subíndice.

ActiveDocument.Background.Chart.DataTable.Font.Subscript = True

Superscript True si la fuente tiene formato de superíndice.

ActiveDocument.Background.Chart.DataTable.Font.Superscript = True

Underline Devuelve o establece el tipo de subrayado aplicado a la fuente.

ActiveDocument.Background.Chart.DataTable.Font.Underline = xlUnderlineStyleDouble