Hallo!
Ich möchte in VBA ein Linien-Säulen Diagramm erstellen. Leider erstellt es mir aber immer ein Diagramm mit zwei Säulen. Ich denke, das liegt daran, dass das Linien-Säulen Digramm ein Benutzerdefinierter Typ ist... Ich habe den Code per Makro-Aufzeichnung gemacht:
Gibt es da eine Lösung, damit es mir wirklicht den Linien-Säulen Typ macht?
Im Grunde brauche ich die Linie nur, um einen Sollwert anzuzeigen (brauche also horizontale Linie). Aber sich der Sollwert verändert, mache ich die Anzeige des Sollwerts halt mittels eines konstanten Datensatzes. -> Gibt es irgendwie die Möglichkeit, eine Linie dynamisch zu zeichnen? Ich könnte ja mit "Zeichnen" eine Solche Linie machen, aber geht das dann dynamisch veränderbar?
Gruss
Michael
Edit: Ach ja, wenn wir schon dabei sind: Weiss gerade jemand was das Diagramm-Aquivalent zu Sheets("Sheet1") ist? Ich hab das diagramm als eigenes Tab definiert und nicht in einem Excel-Sheet drin....
Ich möchte in VBA ein Linien-Säulen Diagramm erstellen. Leider erstellt es mir aber immer ein Diagramm mit zwei Säulen. Ich denke, das liegt daran, dass das Linien-Säulen Digramm ein Benutzerdefinierter Typ ist... Ich habe den Code per Makro-Aufzeichnung gemacht:
Quellcode
- Charts.Add
- ActiveChart.ApplyCustomType ChartType:=xlBuiltIn, TypeName:="Linie - Säule"
- ActiveChart.SetSourceData Source:=Sheets("Daten").Range("A1:C6"), PlotBy:= _
- xlColumns
- ActiveChart.Location Where:=xlLocationAsObject, Name:="Daten"
- With ActiveChart
- .HasTitle = True
- .ChartTitle.Characters.Text = "Täglicher Ausstoss von Maschinen"
- .Axes(xlCategory, xlPrimary).HasTitle = True
- .Axes(xlCategory, xlPrimary).AxisTitle.Characters.Text = "Tag"
- .Axes(xlValue, xlPrimary).HasTitle = True
- .Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "Menge"
- End With
- With ActiveChart.Axes(xlCategory)
- .HasMajorGridlines = False
- .HasMinorGridlines = False
- End With
- With ActiveChart.Axes(xlValue)
- .HasMajorGridlines = True
- .HasMinorGridlines = False
- End With
- ActiveChart.HasDataTable = False
Gibt es da eine Lösung, damit es mir wirklicht den Linien-Säulen Typ macht?
Im Grunde brauche ich die Linie nur, um einen Sollwert anzuzeigen (brauche also horizontale Linie). Aber sich der Sollwert verändert, mache ich die Anzeige des Sollwerts halt mittels eines konstanten Datensatzes. -> Gibt es irgendwie die Möglichkeit, eine Linie dynamisch zu zeichnen? Ich könnte ja mit "Zeichnen" eine Solche Linie machen, aber geht das dann dynamisch veränderbar?
Gruss
Michael
Edit: Ach ja, wenn wir schon dabei sind: Weiss gerade jemand was das Diagramm-Aquivalent zu Sheets("Sheet1") ist? Ich hab das diagramm als eigenes Tab definiert und nicht in einem Excel-Sheet drin....
