[RESOLVED] Chart lines and position.

[yorch]

Thanks, I continues playing and found the solution.

With Sheets("Sheet1").ChartObjects.Add 1,1,5,5).Chart
.SeriesCollection.Add Sheets("Sheet1").Range("B4:C15")
.ChartType = xlLine
.HasTitle = True
.ChartTitle.Text = "Server Comparative Graph"
For y = 1 To 3
.SeriesCollection(y).Border.Weight = xlMedium
Next
End With

Yorch