Problem in Bubble Chart Creation

[JP]

Hi All
I want to create a Bubble chart from DXL code
i can able to create the chart
but, problem is i am not able to set the source to that bubbles

following is the code

Charts.Add
ActiveChart.ChartType = xlBubble
ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range("E7")
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).XValues = "=Sheet2!R1C2"
ActiveChart.SeriesCollection(1).Values = "=Sheet2!R1C3"
ActiveChart.SeriesCollection(1).Name = "=Sheet2!R1C1"
ActiveChart.SeriesCollection(1).BubbleSizes = "=Sheet2!R1C4"

i am getting problem at passing index to SeriesCollection Property
How can i pass the index to SeriesProperty

Please give me any suggestion

Thanks is advance

Regards

Jaya Prakaksh