Brauche Hilfe beim erstellen eines Charts

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Brauche Hilfe beim erstellen eines Charts
von: Jakusa
Geschrieben am: 16.03.2005 11:31:03
Hi alle zusammen,
Kann mir ein VBA-Profi vieleicht Helfen?
Hab so ziemlich Null Ahnung beim erstellen eines Diagramms...
Anhand der gewhlten ChekBox(en) weiss man welche Zeile(n).(Y)
Ab D4 stehen die Zeiten welche in ComboBox wählbar sind.(X)
(Gewählte Zeiten mit Zellen überprüfen = Von Spalte bis Spalte)

Wurde die CheckBox für Werte1 gewählt(Zeile18) und Zeitspanne Von/Bis (D - F)
müsste dies ja irgendwie so aussehen.
Dim chtChart As ChartObject
Dim strBereich As String

Set chtChart = Worksheets(CB_PrimSec.Value).ChartObjects.Add(100, 30, 400, 250)
chtChart.Chart.ChartWizard _ 'Anhand Zeitspanne
Source:=Worksheets(CB_PrimSec.Value).Range("D18:F18"), _
gallery:=xlLine, Title:=CB_PrimSec.Value

'Fehlt noch die X-Achse
Aber wie kann ich das auch mit mehreren CheckBoxen dynamisch erstellen???
Hat jemand einen Tipp oder einen Lösungsvorschlag für mich??

Gruss Jakusa

Bild

Betrifft: AW: Brauche Hilfe beim erstellen eines Charts
von: Chris
Geschrieben am: 16.03.2005 11:57:59
Hi Jakusa,
ich arbeite immer ein wenig anders, ich erstelle erstmal ein leeres Diagramm:
Cells(1, 1).Activate
Charts.Add
ActiveChart.ChartType = xlColumnStacked
und zeichne dann jede einzelne Reihe extra:
mit *ActiveChart.SeriesCollection.NewSeries* erstellst du eine neue leere Reihe (kannst du bei der ersten weglassen),
mit *ActiveChart.SeriesCollection(i).XValues = "=Tabelle1!R5C5:R5C17"* legst du die Werte der X-Achse fest,
mit *ActiveChart.SeriesCollection(i).Values = "=Tabelle1!R6C5:R6C17" - Werte der Reihe
mit *ActiveChart.SeriesCollection(i).Name = "=Tabelle1!R6C1"* - Name der Reihe
i steht für die Nummer der Reihe, fängt bei 1 an und geht bis zu deren Abzahl
Die Bezüge der Reihen muss man leider relativ angeben, deshalb gehe ich bevor ich das Diagramm zeichne immer in Zelle(1,1) - hab noch keine andere Möglichkeit entdeckt :o(
Hilft dir das
Chris
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Brauche Hilfe beim erstellen eines Charts"