
Excel VBAでグラフのタイトルの背景の色を変えたり、色なしに設定する記録です。
下図はExcel2016です。
< スポンサーリンク >
グラフタイトルの背景色を変更する例
アクティブシートの1つ目のグラフのタイトルの背景色を赤に設定します。
Sub test()
ActiveSheet.ChartObjects(1).Chart.ChartTitle.Format.Fill.ForeColor.RGB = RGB(255, 0, 0)
End Sub
アクティブシートの1つ目のグラフのタイトルの背景色を色なしに設定します。
Sub test()
ActiveSheet.ChartObjects(1).Chart.ChartTitle.Format.Fill.Visible = False
End Sub
アクティブシートの全てのグラフのタイトルの背景色を黄色、枠線を青で太さを3に設定します。
Sub test()
Dim i As Long
With ActiveSheet
For i = 1 To .ChartObjects.Count
With .ChartObjects(i).Chart.ChartTitle.Format
‘背景色
With .Fill
.Visible = msoTrue
.ForeColor.RGB = RGB(255, 255, 0)
End With
‘枠線
With .Line
.Visible = msoTrue
.ForeColor.RGB = RGB(0, 0, 255)
.Weight = 3
End With
End With
Next i
End With
End Sub
構文
背景色の色を設定
ChartObjects.Chart.ChartTitle.Format.Fill.ForeColor
背景色を表示・非表示を設定
ChartObjects.Chart.ChartTitle.Format.Fill.Visible
こんな記事も書いています