動作検証バージョン:64bit Windows 10 Pro + 32bit Excel(バージョン2201 ビルド14827.20198 Microsoft Store)
「vba グラフ 目盛間隔」
といった検索で、時折アクセスがあります。
グラフの目盛間隔をExcel VBAで設定するにはどのようなコードを書けばいいのかを探していらしたのでしょうか。
数値軸の目盛間隔を設定するサンプル
簡単なコードで確認しましょう。
上図のようなグラフがアクティブなときに、以下のSubプロシージャを実行してください。
Sub 目盛の間隔を設定する()
Dim ax As Axis
Set ax = ActiveChart.Axes(xlValue)
ax.MajorUnit = 100
End Sub
Dim ax As Axis
Set ax = ActiveChart.Axes(xlValue)
ax.MajorUnit = 100
End Sub
下図のように、数値軸の目盛が「100」単位に設定されます。
軸を表すAxisオブジェクトに用意されているMajorUnitプロパティを使うと、目盛の単位・間隔を設定できます。
数値軸の目盛間隔を自動に変更するサンプル
グラフがアクティブなときに以下のSubプロシージャを実行すれば、目盛の間隔が自動に変更されます。
Sub 目盛の間隔を自動に変更する()
Dim ax As Axis
Set ax = ActiveChart.Axes(xlValue)
ax.MajorUnitIsAuto = True
End Sub
Dim ax As Axis
Set ax = ActiveChart.Axes(xlValue)
ax.MajorUnitIsAuto = True
End Sub
軸を表すAxisオブジェクトのMajorUnitIsAutoプロパティに論理値Trueを設定すると、目盛の単位・間隔が自動になります。
最終更新日時:2022-06-22 16:09
[スポンサードリンク]
- Newer:Target.Countとは
- Older:Word VBAでCellオブジェクトのParentは?
Home » エクセルマクロ・Excel VBAの使い方 » グラフ・Chart » グラフの目盛間隔をExcel VBAで設定する