Oprette Diagram - Muligvis VBA
HejJeg vil gerne oprette et diagram med linjer der forbinder to punkter.
Jeg har fem søjler med følgende data: Linje nr. ; x1 ; y1 ; x2 ; y2:
For hver række vil jeg gerne oprette en linje i diagrammet der forbinder de to punkter. Antallet af rækker er varierende.
Jeg har indspillet en makro for en linje i diagrammet som er vist herunder.
ActiveSheet.ChartObjects("Diagram 5").Activate
ActiveChart.SeriesCollection.NewSeries
ActiveChart.FullSeriesCollection(3).Name = "='Stabiliserende vægge'!$A$15"
ActiveChart.FullSeriesCollection(3).XValues = _
"='Stabiliserende vægge'!$D$15,'Stabiliserende vægge'!$F$15"
ActiveChart.FullSeriesCollection(3).Values = _
"='Stabiliserende vægge'!$E$15,'Stabiliserende vægge'!$G$15
Jeg håber der er en som kan hjælpe