HasLegend Property Example
This example turns on the legend for Chart1 and then sets the legend font color to blue.
With Charts("Chart1") .HasLegend = True .Legend.Font.ColorIndex = 5 End With