動作検証バージョン:64bit Windows 10 Pro + 32bit Excel(バージョン2202 ビルド14931.20132 Microsoft Store)
「TickLabels 消す」
という検索キーワードでアクセスがありました。
Excelでグラフの軸のラベルは、[軸の書式設定]作業ウィンドウ-[軸のオプション]-[軸のオプション]-[ラベル]-[ラベルの位置]ボックスで「なし」を選択することで、非表示にできます。
これをExcel VBAで行うには、どのようなコードを書けばいいのかを探していらしたのでしょうか。
TickLabelsを非表示にするサンプルマクロ
簡単なサンプルをご紹介しておきます。
上図のようなグラフがアクティブな状態で、以下のExcelマクロを実行してください。
Sub TickLabelsを非表示に()
Dim ax As Axis
Set ax = ActiveChart.Axes(xlValue)
ax.TickLabelPosition = xlTickLabelPositionNone
End Sub
Dim ax As Axis
Set ax = ActiveChart.Axes(xlValue)
ax.TickLabelPosition = xlTickLabelPositionNone
End Sub
下図のように数値軸のラベルが非表示になります。
サンプルマクロで使用しているオブジェクトモデル
軸を表すAxisオブジェクトに用意されているTickLabelPositionプロパティを使うと、
軸のラベルをどこに表示するかを取得/設定できます。
このAxis.TickLabelPositionプロパティに、XlTickLabelPosition列挙型に定義されている定数xlTickLabelPositionNoneを指定することで、
軸のラベルを「なし」の状態にできます。
最終更新日時:2022-07-13 14:14
[スポンサードリンク]
- Newer:PowerPoint VBAでSelectAllしてCopy
- Older:Word VBAで図形の塗りつぶしをなしに
Home » エクセルマクロ・Excel VBAの使い方 » グラフ・Chart » TickLabelsを非表示に-Axis.TickLabelPositionプロパティ