[visual basic/excel]

[Ik/Slaughterer]

Ik ben bezig met een macro te maken voor Excel.
De code die ik nu heb is:

Charts.Add
ActiveChart.ChartType = xlXYScatterSmoothNoMarkers
ActiveChart.SetSourceData Source:=Sheets("data").Range("A1")
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).XValues = "=data!deel1.1"
ActiveChart.SeriesCollection(1).Values = "=data!deel1.2"
ActiveChart.SeriesCollection(2).XValues = "=data!deel2.1"
ActiveChart.SeriesCollection(2).Values = "=data!deel2.2"
ActiveChart.SeriesCollection(3).XValues = "=data!deel3.1"
ActiveChart.SeriesCollection(3).Values = "=data!deel3.2"
ActiveChart.Location Where:=xlLocationAsNewSheet, Name:="grafiek"


Hoe kan je zorgen dat je het bereik van een series kan samenvatten in 1 gedefineerd bereik, in plaats van 2 zoals nu het geval is.

Nog een stukje code:

ActiveChart.SeriesCollection(1).Select
ActiveChart.SeriesCollection(1).Trendlines.Add(Type:=xlLinear, Forward:=4, _
Backward:=0, DisplayEquation:=True, DisplayRSquared:=True).Select

Hoe kan je zorgen dat met behulp van een macro de a en b van de formule van de trendlijn apart in een veld in excel verschijnen? (ax+b=y)