Hallo,
ich benötige Hilfe bei meinem Makro. Ich habe zwei Bereiche definiert (Spalten,die nicht nebeneinander liegen), die im x-y-Diagramm angezeigt werden sollen. Leider lassen sich die Bereiche nicht durch das Listentrennzeichen ";" aufzählen. Excel gibt mir dann die Fehlermeldung: "Erwartet Listentrennzeichen". Wenn ich stattdessen ein Komma eingebe, werden alle Daten von Bereich_eins bis Bereich_zwei im Diagramm aufgeführt. In den Systemeinstellungen Deutsch(Deutschland)) ist ";" als Listentrennzeichen eingegeben, Office 2007. Hat noch jemand eine Idee, wie ich dieses Problem lösen könnte? Mein Makro sieht wie folgt aus:
Sub Makro1()
Dim Bereich_eins As Range
Dim Bereich_zwei As Range
Set Bereich_eins = Range("B:B")
Set Bereich_zwei = Range("D:D")
ActiveSheet.Shapes.AddChart.Select
ActiveChart.SetSourceData Source:=Range(Bereich_eins ; Bereich_zwei)
ActiveChart.ChartType = xlLine
End Sub
Danke im Voraus. |