Excel VBA グラフのタイトルの文字の色を変更する-Font.Fill.ForeColor

Excel VBAでグラフのタイトルの文字の色を変更する記録です。

下図はExcel2016です。

VBAグラフタイトル

 

< スポンサーリンク >

 

書き方

ChartObjects.Chart.ChartTitle.Format.TextFrame2.TextRange.Font.Fill.ForeColor

 

アクティブシートの1つ目のグラフのタイトルの文字の色をRGB値で緑に設定します。

Sub test()
    ActiveSheet.ChartObjects(1).Chart.ChartTitle.Format.TextFrame2.TextRange.Font.Fill.ForeColor.RGB = RGB(0, 255, 0)
End Sub

VBAグラフタイトル文字色

VBAグラフタイトル文字色

 

アクティブシートの全てのグラフのタイトルの文字の色をRGB値で青に設定します。
「For...Next」と「For Each...Next」の2つの方法を書きます。

Sub test()
    Dim i As Long

    With ActiveSheet
        For i = 1 To .ChartObjects.Count
            .ChartObjects(i).Chart.ChartTitle.Format.TextFrame2.TextRange.Font.Fill.ForeColor.RGB = RGB(0, 0, 255)
        Next i
    End With
End Sub

VBAグラフタイトル文字色

Sub test()
    Dim cho As ChartObject

    For Each cho In ActiveSheet.ChartObjects
        If cho.Chart.HasTitle Then
            cho.Chart.ChartTitle.Format.TextFrame2.TextRange.Font.Fill.ForeColor.RGB = RGB(0, 0, 255)
        End If
    Next cho
End Sub

VBAグラフタイトル文字色

VBAグラフタイトル文字色

 

< スポンサーリンク >



サブコンテンツ

このページの先頭へ