Diagramm mit VBA
11.07.2015 09:46:34
Anld
Hallo zusammen,
ich habe versucht mir aus einem Datenbereich ein Diagramm erzeugen zu lassen.
Dafür habe ich einfach mal den Makro Recorder mitlaufen lassen und Folgenden Code erhalten:
Sub Diagramm()
Range("C5:M28").Select
ActiveSheet.Shapes.AddChart2(297, xlColumnStacked).Select
ActiveChart.SetSourceData Source:=Range("'Gesamtergebnis 1'!$C$5:$M$28")
End Sub
Der Makro Recorder nimmt zumindest den Wechsel der Zeilen und Spalten nicht auf bzw. es wird der Eintrag hinzugefügt:
ActiveChart.SetSourceData
Ich hoffe Ihr könnte mir weiterhelfen und vielen Dank im Voraus.
Beste Grüße
Anld
Anzeige