Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 18:57:33
17.04.2024 16:56:58
Anzeige
Archiv - Navigation
388to392
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
388to392
388to392
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

charts und vba

charts und vba
02.03.2004 13:01:25
felix
einfache frage fuer vba koenner:
habe ein sheet mit 6 charts und moechte mit jedem chart eine routine ausfuehren. nun suche ich das makro, das jedes chart nacheinander aufruft. muessste doch ungefaehr so gehen:

Sub charts_anwahl()
for each chart in active.worksheet
next chart
End Sub

funzt leider nicht....
danke fuer eure hilfe!
felix

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: charts und vba
02.03.2004 13:10:12
Waltraud
Ich denke, es müsste so aussehen
For Each ch In ActiveSheet.Charts

Next ch
AW: charts und vba
02.03.2004 13:14:26
felix
leider geht das nicht, da runtimeerror 438 und ch nicht als objekt unterstuetzt
wer hat hilfe,
danke!!!!
AW: charts und vba
02.03.2004 13:24:56
Waltraud
Probiers so:
For i = 1 To ActiveSheet.ChartObjects.Count
MsgBox ActiveSheet.ChartObjects(i).Name
Next i
AW: charts und vba
02.03.2004 13:17:09
Jens
Hi
Der Ansatz ist nicht ganz verkehrt aber auch nicht richtig.
Object Reihenfolge bei Diagramm auf Tabelle
Tabelle -> Diagramm Träger -> Diagramm -> Datenreihen usw.
ActiveSheet.ChartObjects(X).Chart.Chartseries ....
Dim Diagramm As ChartObject
For Each Diagramm In ActiveSheet.ChartObjects
Diagramm.Chart.SetSourceData Source:=Sheets("Tabelle1").Range("A1:B5")
Next
Gruß Jens
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige