chart resize macro

  • Thread starter Thread starter Josh Craig
  • Start date Start date
J

Josh Craig

Hi all,

I often have to put a large number of charts in a report that need to be the
same size.

I'd like to create a macro that automatically resizes selected charts rather
than manually resizing each one.

I've tried to record a macro where I select a chart and resize it but the
resizing part doesn't seem to get recorded.

Any idea on how I would do this?

Thanks,

Josh
 
Sub ChartResize1024x768()
Dim oCht As Chart
Set oCht = ActiveChart
oCht.Parent.Width = 768 '1024*.75=768
oCht.Parent.Height = 576 '768 *.75=576
End Sub
 
Back
Top