How to write macro to set the chart scale min/max property?
This is the method if the chart is on the worksheet
ActiveSheet.ChartObjects("Chart 3").Activate
With ActiveChart.Axes(xlCategory)
.MinimumScale = 10
.MaximumScale = 120
End With
The real problem is finding the chart name if is on a worksheet. A chart is
first create as a sheet object and then placed on a worksheet. But the name
is changed when it is moved from a sheet to a an object on a worksheet. the
number increases. Here is one way to verify the name
msgbox(ActiveSheet.ChartObjects(1).name)
The 1 will refere to the first chart on the worksheet. Change the one as
required
"Troubled" wrote:
I have been trying to set the minimum and maximum values for the value axis
in Chart1 using macros without success.
The Help file mentioned below VBA but I tried and it doesn't work. Maybe I
missed out writing some steps.
With Charts("Chart1").Axes(xlValue)
.MinimumScale = 10
.MaximumScale = 120
End With
Anyone can help me??? Many Thanks.
|