Matching Font Colour In Graph Legend

[Faysamantha]

Hi

I have created a line graph from a table of data, however the legend has black font but I need it to match with the colours of the columns from my table.

is this possible?

 

[Trevor G]

If you know the colour of the graph column then you can apply that in the legend.

I have just done this on version 2007.

Select the Chart > Legend > Text in Legend and use the Home Tab and change the colour

 

[Faysamantha]

Hi

Thank you for your respond. I am using the latest version and cant seem to find that.

 

[Faysamantha]

Hi

Thank you for your respond. I am using the latest version and cant seem to find that.

Sorry, also forgot to mention that there are 65 different titles, the legend has created its own colours which i need to append to the titles in the data source table.

 

[Trevor G]

Look to record a macro to select the graph and adjust the font colour's you then will have enough code to change all the Legend fonts.

Sample code is as follows:

Sub Macro1()
'You need to now the legend entry number and colour that you want
ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.Legend.Select
ActiveSheet.ChartObjects("Chart 1").Activate
ActiveChart.Legend.LegendEntries(6).Font.Color = vbRed 'I have added this to colour red
ActiveChart.Legend.LegendEntries(5).Font.Color = vbGreen 'I have added this to colour green

End Sub