Can the following be done in one line:

'============================================
ActiveSheet.ChartObjects(1).Activate
ActiveChart.SetSourceData source:=Range("R30:R42")
'============================================

the following seems intuitive but doesn't work:

'============================================
ActiveSheet.ChartObjects(1).SetSourceData source:=Range("R30:R42")
'============================================

I don't understand why the object (ChartObjects(1)?) doesn't support
the property (SetSourceData?)

Any help greatly appreciated.
JasonQ