In diesem Beispiel wird die Legende für das aktive Diagramm eingeblendet.
ActiveChart.HasLegend = True