Plot value at top of chart


Joe M.

Is it possible to have the highest data point on a line graph plot at the
very top of a chart? For example, if the highest data point is 90 then I
would like highest value of the y axis to also be 90 placing the data point
at the top of the chart instead of excel automatically adding a "cushion
(like 10) to the y axis. The data points vary each time the chart is created
so i can't fix the value at 90.

Joe M.




Hi Joe,

I was looking at this issue yesterday and came upon this macro. It set the
high of the axis to the highest point of the data and also the low of the
axis to the lowest point of the data. In case you want to start from 0, you
will need to modified the code a bit. Hope this is what you want.

Sub AutoScaleYAxes()
Dim ValuesArray(), SeriesValues As Variant
Dim Ctr As Integer, TotCtr As Integer
With ActiveChart
For Each X In .SeriesCollection
SeriesValues = X.Values
ReDim Preserve ValuesArray(1 To TotCtr + UBound(SeriesValues))
For Ctr = 1 To UBound(SeriesValues)
ValuesArray(Ctr + TotCtr) = SeriesValues(Ctr)
TotCtr = TotCtr + UBound(SeriesValues)
.Axes(xlValue).MinimumScaleIsAuto = True
.Axes(xlValue).MaximumScaleIsAuto = True
.Axes(xlValue).MinimumScale = Application.Min(ValuesArray)
.Axes(xlValue).MaximumScale = Application.Max(ValuesArray)
End With
End Sub

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question