Hallo Forum,
ich habe ein Problem beim Erstellen eines Diagrammes. Und zwar moechte ich diesem mittels der ChartTitle Eigenschaft eine Ueberschrift zuweisen, was aber einfach nicht funktionieren mag. Mein Code sieht dabei wie folgt aus:
Set chrtWoche = Worksheets("Weekly Report").ChartObjects(1).Chart
For i = 1 To NoDatenreihen
chrtWoche.SeriesCollection.NewSeries
chrtWoche.SeriesCollection(i).Values = Bereich(i)
.... (einige weitere Diagrammeigenschaften werden zugewiesen) ....
Next i
chrtWoche.ChartTitle.Text = "ABC"
Die Diagrammerstellung in der For-Schleife funktioniert ohne Probleme, aber beim Zuweisen des ChartTitles passiert gar nichts. Es kommt auch keine Fehlermeldung. Hat jemand eine Idee? Vielen Dank fuer eure Hilfe!
Viele Gruesse
Andreas