dynamisches Diagramm
27.09.2005 17:13:45
Ralf
ich habe folgendes Problem, und weiß nicht ob mein Lösungsansatz überhaupt realisierbar ist:
Ich habe eine Tabelle, die je nach "Sachlage" verschiedenviele Zeilen und Spalten hat, die aus einem anderen Datenblatt übernommen werden. Jetzt soll mittels Makro ein Diagramm erstellt werden, das immer die jeweiligen Daten der Tabelle darstellt. Mein Ansatz, um erstmal die Zeilen richtig zu erfassen sieht so aus:
Sub dia()
Dim Bereich As Range
Dim x As Integer
Sheets("Tabelle1").Select
x = ActiveSheet.UsedRange.Rows.Count
Set Bereich = Range("A1:Px") <-- ?
Charts.Add
With ActiveChart
.ChartType = xlColumnStacked
.SetSourceData Source:=Bereich, PlotBy:=xlRows
.HasTitle = False
End With
End Sub
Mein Problem liegt jetzt in der markierten Zeile. Warum kann ich mir den durch "ActiveSheet.UsedRange.Rows.Count" nicht einfach in "Bereich" einsetzen? Bzw. wie geht es richtig, insofern es überhaupt so möglich ist?!
Weiß jemand Rat? Ich wäre sehr dankbar, denn ich bin am verzweifeln...
Grüße,
Ralf
Anzeige