How can I set the chart size of an existing active/selected chart?

I tried this withing a sub routine:

With ActiveChart.ChartArea
.Width = 5
.Height = 3
End With


And get the error message: Unable to Set the Width Property of the
ChartArea Class

Any help is appreciated.