Home » エクセルマクロ・Excel VBAの使い方 » グラフ・Chart » グラフタイトルのフォントサイズを変更する－ChartTitle.Font.Size

グラフタイトルのフォントサイズを変更する－ChartTitle.Font.Size

対象：Excel2010, Excel2013, Windows版Excel2016

「excel vba グラフタイトルフォントサイズ」
「マクログラフタイトルのフォントを小さくする」
といった検索キーワードをきっかけにして、
　Chartオブジェクト
　　└ChartTitleオブジェクト
　　　　└ChartFormatオブジェクト
　　　　　　└TextFrame2オブジェクト
　　　　　　　　└TextRange2オブジェクト
　　　　　　　　　　└Font2オブジェクト
といった深い階層のオブジェクトを使って、グラフタイトルのフォントサイズを変更するExcelマクロをご紹介しました。

これからVBAでグラフをガッツリ操作したいという方には、この階層構造を理解していただきたいのですが、とりあえず、お手軽にグラフタイトルのフォントサイズを変更したいという場合には、もっと理解しやすい書き方もあります。

グラフタイトルのフォントサイズを変更するサンプルマクロ

以下のSubプロシージャを実行すると、アクティブシート上の、埋め込みグラフのフォントサイズが14になります。

Sub グラフタイトルのフォントサイズを変更する()
　Dim cho As ChartObject
　For Each cho In ActiveSheet.ChartObjects
　　If cho.Chart.HasTitle Then
　　　cho.Chart.ChartTitle.Font.Size = 14
　　End If
　Next cho
End Sub

ChartTitleオブジェクトはFontプロパティを持つ

オブジェクトブラウザー上では隠し属性となっていますけれど、ChartTitleオブジェクトはFontオブジェクトを返すFontプロパティを持っています。

オブジェクトブラウザー：ChartTitle.Font

既にご紹介しているマクロでフォントを操作するために使ったオブジェクトの階層が、
　Chartオブジェクト
　　└ChartTitleオブジェクト
　　　　└ChartFormatオブジェクト
　　　　　　└TextFrame2オブジェクト
　　　　　　　　└TextRange2オブジェクト
　　　　　　　　　　└Font2オブジェクト
であるのに対し、上記マクロで利用しているのは、
　Chartオブジェクト
　　└ChartTitleオブジェクト
　　　　└Fontオブジェクト
と3階層分浅いので、とても理解しやすいはずです。

ただし、隠しプロパティになっているわけですから、将来使えなくなる可能性も否定できないことは覚悟しておきましょう。一応。