Excel VBA グラフの凡例の高さや幅を取得、設定する-Height、Width

Excel VBAグラフ凡例高さを取得、設定する記録です。

グラフの凡例の高さを取得、設定するには「Legend」オブジェクトの「Height」プロパティ、幅を取得、設定するには「Legend」オブジェクトの「Width」プロパティを使います。

< スポンサーリンク >





「Height」「Width」プロパティ構文

高さ

式.Height

式.Width

オブジェクトの幅をポイント単位で返します。 読み取り専用です。

 

VBAでグラフ凡例の高さ、幅の設定例

アクティブシートの1つ目のグラフの凡例の高さをメッセージで表示します。

Sub test()
    MsgBox ActiveSheet.ChartObjects(1).Chart.Legend.Height
End Sub

VBAグラフタイトル凡例高さ幅

VBAグラフタイトル凡例高さ幅

 

アクティブシートの1つ目のグラフの凡例の幅をメッセージで表示します。

Sub test()
    MsgBox ActiveSheet.ChartObjects(1).Chart.Legend.Width
End Sub

VBAグラフタイトル凡例高さ幅

VBAグラフタイトル凡例高さ幅

 

アクティブシートの1つ目のグラフの凡例の高さを50、幅を50に設定してみます。
※下図の例は、高さが足りないので、高さは50にはなっていません。

Sub test()
    With ActiveSheet.ChartObjects(1).Chart.Legend
        .Height = 50
        .Width = 50
    End With
End Sub

VBAグラフタイトル凡例高さ幅

VBAグラフタイトル凡例高さ幅

 

アクティブシートの1つ目のグラフの凡例の高さと幅を2つ目のグラフと同じ高さと幅に設定してみます。

Sub test()
    With ActiveSheet.ChartObjects(1).Chart.Legend
        .ChartObjects(1).Chart.Legend.Height = .ChartObjects(2).Chart.Legend.Height
        .ChartObjects(1).Chart.Legend.Width = .ChartObjects(2).Chart.Legend.Width
    End With
End Sub

VBAグラフタイトル凡例高さ幅

VBAグラフタイトル凡例高さ幅

 

< スポンサーリンク >※広告先のお問い合わせは広告主様にお願いします