Home » エクセルマクロ・Excel VBAの使い方 » グラフ・Chart » VBAでTickLabels(軸ラベル??)のフォントサイズを

VBAでTickLabels(軸ラベル??)のフォントサイズを

動作検証バージョン:64bit Windows 10 Pro + 32bit Excel(バージョン2105 ビルド14026.20270 Microsoft Store)

「フォントサイズ 変更 vba グラフ 軸ラベル」
という検索をきっかけに、グラフの軸ラベルのフォントサイズを変更するExcel VBAのコードをご紹介しました。

「軸ラベル」と表現されているのが、実は別のものである可能性があると、私は考えています。

軸ラベルと軸の違い

下図の赤線で囲った部分、縦軸の数値や横軸の「Apr May Jun」と表示されている部分を、「軸ラベル」と誤解している方が、少なからずいらっしゃるように思うのですが、

Excel 軸ラベルと軸の違い

これらは「軸ラベル」ではなく、公式には「」と表現されています。

[スポンサードリンク]

グラフが選択されると自動的に表示される[グラフツール]-[書式]タブの[グラフ要素]ボックスで、「横(項目)」を選択すれば、下図のように選択され、

[グラフツール]-[書式]タブの[グラフ要素]ボックス 「横(項目)軸」

「縦(数値)」を選択すれば、下図のように選択されます。

[グラフツール]-[書式]タブの[グラフ要素]ボックス 「縦(数値)軸」

軸のフォントサイズを変更するサンプル

上述のような「軸」のフォントサイズを変更したい場合は、以下のようなコードです。グラフがアクティブな状態で実行してください。

Sub 軸のフォントサイズを設定する()
 Dim ax_cat As Axis
 Set ax_cat = ActiveChart.Axes(xlCategory)
 ax_cat.TickLabels.Font.Size = 8
 
 Dim ax_val As Axis
 Set ax_val = ActiveChart.Axes(xlValue)
 ax_val.TickLabels.Font.Size = 8

End Sub

Axisオブジェクトに用意されているTickLabelsプロパティで、

Excel.Axis.TickLabels

TickLabelsオブジェクトを取得して、Fontプロパティで取得できるFontオブジェクトを使って

Excel.TickLabels.Font

設定しています。

最終更新日時:2021-06-17 14:36

[スポンサードリンク]

Home » エクセルマクロ・Excel VBAの使い方 » グラフ・Chart » VBAでTickLabels(軸ラベル??)のフォントサイズを

TrackBack:0

TrackBack URL

Home » エクセルマクロ・Excel VBAの使い方 » グラフ・Chart » VBAでTickLabels(軸ラベル??)のフォントサイズを

「グラフ・Chart」の記事一覧

検索


Copyright © インストラクターのネタ帳 All Rights Reserved.

.