Diagramm Datenquelle

Forumthread: Diagramm Datenquelle

15.07.2003 09:25:14

Harald Dittmann

Hallo,
ich möchte den Datenbereich in einem Diagramm in einer Zelle angeben.
Kann mir jemand helfen

MfG
Harald Dittmann

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Diagramm Datenquelle

15.07.2003 09:43:20

Dominik
AW: Diagramm Datenquelle

15.07.2003 09:53:24

Harald Dittmann
AW: Diagramm Datenquelle

15.07.2003 10:00:03

Andreas Walter
AW: Diagramm Datenquelle

15.07.2003 12:45:42

Harald Dittmann
AW: Diagramm Datenquelle

15.07.2003 13:52:57

Andreas Walter

AW: Diagramm Datenquelle

15.07.2003 09:43:20

Dominik

Hallo Harald,

rechtsklick auf Dein Diagramm -> Datenquelle -> dann Deinen Datenquellenbereich markieren (z.B. Tabelle1!$A$7:$B$11)-> StrgC -> Zelle markieren -> Strg V und fertig.

Ich hoffe, ich habe Deine Frage richtig verstanden.

MfG
Dominik

AW: Diagramm Datenquelle

15.07.2003 09:53:24

Harald Dittmann

Vielen Dank Dominik,
ich möchte aber in einer Tabelle meinen Datenbereich in einer Zelle angeben, und dann automatisch in das Diagramm übertragen haben.

MfG
Harald

AW: Diagramm Datenquelle

15.07.2003 10:00:03

Andreas Walter

In einem makro geht es wie folgt:
In Tabelle1 Feld C1 hast Du z.B. das Wort Tabelle1
In Tabelle1 Feld C2 hast Du z.B. den Bereich A1:A10
Dann in einem Makro
Dim hilf1 As String
Dim hilf2 As String
'
hilf1 = Sheets("Tabelle1").Cells(1, 3).Value
hilf2 = Sheets("Tabelle1").Cells(2, 3).Value

ActiveSheet.ChartObjects("Diagramm 1").Activate
ActiveChart.PlotArea.Select

ActiveChart.SetSourceData Source:=Sheets(hilf1).Range(hilf2), PlotBy _
:=xlColumns

AW: Diagramm Datenquelle

15.07.2003 12:45:42

Harald Dittmann

Vielen Dank Andreas,
hat mir schon viel geholfen.
Ich möchte aber einen Datenbereich wie folgt eingeben
=Tabelle1!A1:D1;Tabelle1!A120:D140
Geht das?

MfG
Harald

AW: Diagramm Datenquelle

15.07.2003 13:52:57

Andreas Walter

Nutz mal den Macro Recorder um zu sehen, was aufgezeichnet wird.

Wenn ich es richtig sehe, muss in C2
nicht A1:A10
sondern A1:A10,A20:A30
stehen. Dann geht
ActiveChart.SetSourceData Source:=Sheets(hilf1).Range(hilf2), ....

ODER
Du schreibst in C2 A1:A10
und in C3 A20:A30
Dann
Dim hilf1 As String
Dim hilf2 As String
Dim hilf3 as String
'
hilf1 = Sheets("Tabelle1").Cells(1, 3).Value
hilf2 = Sheets("Tabelle1").Cells(2, 3).Value
hilf3 = Sheets("Tabelle1").Cells(3, 3).Value

ActiveSheet.ChartObjects("Diagramm 1").Activate
ActiveChart.PlotArea.Select

ActiveChart.SetSourceData Source:=Sheets(hilf1).Range(hilf2 & "," & hilf3),

Nicht getestet

Beliebteste Forumthreads (12 Monate)

Forumthread: Diagramm Datenquelle

5 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

5
Beiträge zum Forumthread

Beiträge zu diesem Forumthread