Resize Chart Area in 2010 Excel VBA

[rathalex]

Hello

Im trying to resize the chart area width and height using vba,but keep getting “shape is locked and cannot be resized” error.
I am using basic commands such as:

With ActiveChart
.ChartArea.Height = 200
.ChartArea.Width= 50
End With

Any way to work around this lock error?

Thank you

 

[NdNoviceHlp]

HTH. Dave
'size chart

Dim CurrentChart As Chart
Set CurrentChart = Sheets("Sheet1").ChartObjects(1).Chart
CurrentChart.Parent.Width = 50
CurrentChart.Parent.Height = 200

There's a plotarea as well...

With Sheets("Sheet1").ChartObjects(1).Chart.PlotArea
.Width = 50
.Height = 200
.Top = 20  'apply plot area distance from top of chart
.Left = 15  'apply plot area distance from left of chart
End With