Hi,

It does not like it because it contains multiple areas.
The will construct a reference from the areas. Note there is a limit to
the length of the series formula so lots of area may cause another error
to occur.

'---------------
Dim rngTemp As Range
Dim strAddress As String

For Each rngTemp In Range("C11,C13,C15").Areas
strAddress = strAddress & _
"'" & rngTemp.Parent.Name & "'!" & _
rngTemp.Address(, , xlR1C1) & ","
Next
strAddress = "=(" & Left(strAddress, Len(strAddress) - 1) & ")"

ActiveChart.SeriesCollection(1).Values = strAddress
'---------------

Cheers
Andy

YH wrote:
I am in the process of automating a chart creation and get stuck on this line:

'WS is declared as a worksheet
ActiveChart.SeriesCollection(1).values = WS.Range("G34, I34, K34, M34, O34")

I want to create a series in a chart by selecting multiple noncontinguous
cells, but
I run into errors executing this line.

Can someone point out what is wrong?

Thanks,

YH

--

Andy Pope, Microsoft MVP - Excel
http://www.andypope.info