
Excel VBAでグラフのタイトルの向きを変える記録です。
グラフのタイトルの向きを変えるには、「Orientation」プロパティを使います。
< スポンサーリンク >
「Orientation」プロパティ構文
式.Orientation
文字の向きを表すバリアント型 (Variant) の値を取得または設定します。
このプロパティの値には、-90~90°の整数値、または「xlorientation」クラスの定数のいずれかを設定できます。
xlorientation定数
| 名前 | 値 | 説明 |
|---|---|---|
| xldownward | -4170 | 下向き |
| xlHorizontal | -4128 | 水平方向 |
| xlupward | -4171 | 上向き |
| xlvertical | -4166 | 文字列は下向きでセルの中央に配置されます |
VBAでグラフタイトルの向きを変える例
下向き
アクティブシートの1つ目のグラフのタイトルを下向きに設定します。
Sub test()
ActiveSheet.ChartObjects(1).Chart.ChartTitle.Orientation = xlDownward
End Sub


水平
アクティブシートの1つ目のグラフのタイトルを水平に設定します。
Sub test()
ActiveSheet.ChartObjects(1).Chart.ChartTitle.Orientation = xlHorizontal
End Sub


上向き
アクティブシートの1つ目のグラフのタイトルを上向きに設定します。
Sub test()
ActiveSheet.ChartObjects(1).Chart.ChartTitle.Orientation = xlUpward
End Sub


下向きでセル中央
アクティブシートの1つ目のグラフのタイトルを文字列は下向きでセルの中央に設定します。
Sub test()
ActiveSheet.ChartObjects(1).Chart.ChartTitle.Orientation = xlVertical
End Sub


45°
アクティブシートの1つ目のグラフのタイトルを45°に設定します。
Sub test()
ActiveSheet.ChartObjects(1).Chart.ChartTitle.Orientation = 45
End Sub


こんな記事も書いています
