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

Forumthread: SetSourceData Fehler

SetSourceData Fehler
12.11.2021 15:34:33
Linux
Guten Nachmittag Excel Experten,
ich bin gerade dabei Daten aus Tabellen grafisch Darzustellen, da es sich um große Mengen an Daten und Tabellen handelt will ich das ganze per VBA tun. Nun habe ich ein Problem. Wenn ich:
ActiveSheet.ChartObjects("1").Activate
ActiveChart.SetSourceData Source:=b1.Range("A1:O3")
benutze funktioniert die Festlegung des Datenbereichs einwandfrei, allerdings bei :
i = b2.Cells(Rows.Count, 1).End(xlUp).Row
j = b2.Cells(1, Columns.Count).End(xlToLeft).Column-1
ActiveSheet.ChartObjects("Diagramm 4").Activate
ActiveChart.SetSourceData Source:=b2.Range(Cells(1, 1), Cells(i, j))
bringt er mir die Fehlermeldung, dass die Range Methode vom Objekt nicht unterstützt wird.
Wichtig ist hier aber der Variable Bezug über i und j, da sich die Tabellen mit den Daten in den Größen verändern und ich die Range nur per i und j definieren kann.
Nun meine Frage, wie ist es möglich die Daten in mein Diagramm zu laden?
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: SetSourceData Fehler
12.11.2021 16:33:06
Beverly
Hi,
bei b2.Range(Cells(1, 1), Cells(i, j)) beziehst du dich mit b2.Range(...). auf ein definiertes Tabellenblatt, welches nicht unbedingt das aktive sein muss. Mit (Cells(1, 1), Cells(i, j)) jedoch beziehst du dich auf das gerade aktive Blatt und das passt nicht zusammen - du musst dich mit Cells() selbstverständlich auch auf das Blatt b2 beziehen:

With ActiveSheet.ChartObjects("Diagramm 4").Chart
.SetSourceData Source:=b2.Range(b2.Cells(1, 1), b2.Cells(i, j))
End With
Außerdem muss man das Diagramm nicht aktivieren um den Wertebereich zuzuweisen.

GrußformelBeverly's Excel - Inn
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige