wie kann ich den die untenstehende prozedur so verändern, dass sie die aktuell ausgewählte serie verwendet? (und nicht eine vordefinierte: seriescollection(1))
ein herzlicher dank
kerbi
auszug:
Dim counter As Integer
For counter = 1 To rng.Rows.Count
With .SeriesCollection(1).Points(counter)
.HasDataLabel = True
.DataLabel.Text = rng.Cells(counter)
End With
Next counter