One of my collegues was running amacroin excel, and came up with a subscript
error.

I have tried to figure out what is wrong but my knowledge of VB is somewhat
limited - can anyone help

Here is the code

Kaart = "Chart " & y
Windows("QC kontrol udsendelse.xls").Activate
Sheets("Abnormal 1").Select
ActiveSheet.ChartObjects(Kaart).Activate
ActiveChart.SeriesCollection(1).Points(z).Select
With Selection.Border
.Weight = xlHairline
.LineStyle = xlNone
End With

The Macro stops on the following line

ActiveChart.SeriesCollection(1).Points(z).Select


Thanks in advance for any help anyone can offer.

Rgds,
Daniel