Olá pessoal!
O problema é o seguinte: No título do gráfico tenho duas informações relevantes: o título e o subtitulo. Não estou conseguindo, via código, formatar de modo que o Título fique bem maior que o
subtítulo.
Encontrei este código na internet, entretanto somente a última configuração que entra e em todo o texto.
Estou usando Excel 2007 (versão 12.0.6545.5000) em ambiente Win XP.
Sub FormataTitulo()
ActiveSheet.ChartObjects(1).Activate
Title1 = "Titulo"
Title2 = "Subtitulo"
Title = Title1 & Chr(10) & Title2
With ActiveChart.ChartTitle
.Text = Title
With .Characters(Start:=1, Length:=Len(Title1)).Font
.Name = "Calibri (Corpo)"
.Bold = True
.Size = 18
End With
With .Characters(Start:=Len(Title1) + 1, Length:=Len(Title2)).Font
.Name = "Calibri (Corpo)"
.Bold = False
.Size = 10
End With
End With
End Sub
Desde já, grato!
André Leopoldino