Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
280to284
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
280to284
280to284
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Diagramm Datenquelle

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
Anzeige
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


Anzeige
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


Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige