Formatting Multiple Series In An Excel Chart

[ashleyianni]

Hi,

I am trying to format data labels in a pivot chart that has multiple series. I understand that VBA code would be the easiest way but I am not familiar with it, can anyone let me know how to write a script that would change the text on the data labels to white and bold?

Thank you

[NickyC]

Hi
try this

Sub format_labels()
Dim ss As Series
For Each ss In ActiveChart.SeriesCollection
    If ss.HasDataLabels = True Then
        With ss.DataLabels.Font
            .Bold = True
            .Color = RGB(256, 256, 256)
        End With
    End If
Next ss
End Sub

[ashleyianni]

Hi

works great except that when I made a different selection on one of the slicers then the formatting reverts back. Is there a way to have the code autorun every time a selection is made? I have multiple charts on the same page that would need updating. Thanks