For schleife einbauen
11.02.2004 21:53:35
dirk
dieser Code erstellt ein Diagramm per Button
nun möchte ich den bereich mit einer for i schleife erweitern!
wie kann man darum eine for schleife basteln und mit einer variablen
die bereiche bei bestimmten bedingungen erweitern?
kann mir jemand vielleicht eine for schleife darum basteln?
danke dirk
Private Sub CommandButton1_Click()
Range("A1:D3").Select
Charts.Add
ActiveChart.ChartType = xlColumnClustered
ActiveChart.SetSourceData Source:=Sheets("Tabelle1").Range("A1:D3")
ActiveChart.Location Where:=xlLocationAsObject, Name:="Tabelle1"
End Sub