[vba]With ChartObjects("Chart 1").Chart.Axes(xlValue)
.MinimumScale = Range("C1").Value
.MaximumScale = Range("C2").Value
End With
[/vba]
[vba]With ChartObjects("Chart 1").Chart.Axes(xlValue)
.MinimumScale = Range("C1").Value
.MaximumScale = Range("C2").Value
End With
[/vba]
p45cal
Everyone: If I've helped and you can't be bothered to acknowledge it, I can't be bothered to look at further posts from you.
Posting Permissions
Reply With Quote