
Excel VBAでグラフのタイトルの位置を自由に設定したり、自動に設定する記録です。
縦位置を設定するには「Top」プロパティ、横位置を設定するには「Left」プロパティ、自動に設定するには「Position」プロパティを使います。
< スポンサーリンク >
「Top」「Left」「Position」構文
式.Top
上端の距離をポイント単位で表す倍精度浮動小数点型(Double)の値を取得、または設定します。
式.Left
左端の距離をポイント単位で表す倍精度浮動小数点型(Double)の値を取得、または設定します。
式.Position
グラフタイトルの位置を取得、または設定します。
※xlChartElementPositionAutomaticを指定すると自動で設定されます。
VBAでグラフタイトルの位置を設定する例
アクティブシートの1つ目のグラフタイトルを上から10、左から10の位置に設定します。
Sub test()
With ActiveSheet.ChartObjects(1).Chart.ChartTitle
.Top = 10
.Left = 10
End With
End Sub
アクティブシートの1つ目のグラフタイトルの位置を自動に設定します。
Sub test()
ActiveSheet.ChartObjects(1).Chart.ChartTitle.Position = xlChartElementPositionAutomatic
End Sub
こんな記事も書いています