Good Morning,
I have a chart with 2 Y axis. I am attempting to write some code that will update both axis with the same max & min value that is triggered by the combobox selection. The code will update the axis but is not triggered by the combobox selection.
Private Sub ChangeAxisScales()
With ActiveSheet.ChartObjects("Chart 1").Chart
' Value (Y) Axis
.Axes(xlValue).MaximumScale = Sheets("Work").Range("U11").Value
.Axes(xlValue).MinimumScale = Sheets("Work").Range("V11").Value
.Axes(xlValue, xlSecondary).MaximumScale = Sheets("Work").Range("U11").Value
.Axes(xlValue, xlSecondary).MinimumScale = Sheets("Work").Range("V11").Value
End With
End Sub
Bookmarks