Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Diagramm funktioniert nicht unter Ex 2007

Diagramm funktioniert nicht unter Ex 2007
20.08.2008 12:37:17
Bernd
Hallo,
Nachdem ich eines meiner Probleme selbst gelöst habe, doch noch einmal zu dem Problem, dass ich einem Chart in Excel 2003 über VBA neue Bereiche zuordnen kann, wenn ich die Datei aber unter Excel 2007 öffne, bekomme ich eine Fehlermeldung.
Vielleicht findet sich ja doch noch jemand, der mir weiterhelfen kann.
Eine Beispieldatei habe ich unter
https://www.herber.de/bbs/user/54749.xls
hochgeladen.
Diemal bleibe ich auch im Thread :-))
Viele Grüße
Bernd

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Diagramm funktioniert nicht unter Ex 2007
20.08.2008 21:14:50
Beverly
Hi Bernd,
schreibe den Code nach diesem Prinzip

With Charts(1)
.SeriesCollection(1).XValues = Worksheets("Tabelle1").Range(Worksheets("Tabelle1").Cells(5,  _
3), Worksheets("Tabelle1").Cells(14, 3))
If i = 0 Then
.SeriesCollection(1).Name = Worksheets("Tabelle1").Cells(4, 5)
.SeriesCollection(1).Values = Worksheets("Tabelle1").Range(Worksheets("Tabelle1").Cells( _
5, 5), Worksheets("Tabelle1").Cells(14, 5))
i = 1
Else
.SeriesCollection(1).Name = Worksheets("Tabelle1").Cells(4, 4)
.SeriesCollection(1).Values = Worksheets("Tabelle1").Range(Worksheets("Tabelle1").Cells( _
5, 4), Worksheets("Tabelle1").Cells(14, 4))
i = 0
End If
End With


Er funktioniert in beiden Excelversionen.



Anzeige
AW: Diagramm funktioniert nicht unter Ex 2007
21.08.2008 23:58:00
Bernd
Hallo Beverly,
komme erst jetzt wieder dazu hereinzuschauen und finde Deine Lösung.
Habe Sie gleich ausprobiert und kann nur sagen 'funzt SUPER'.
Mir fällt ei Stein vom Herzen.
Ganz, ganz lieben Dank für Deine Mühe.
Viele Grüße
Bernd

308 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige