Hem / Tips & tricks
Dim i as IntegerFor i = 1 To MSChart1.Plot.SeriesCollection.Count MSChart1.Column = i MSChart1.ColumnLabel = "Legend Text " & iNext