Through the good advice of Healey21 very elegantly was able to rescale my x axis charts using cell inputs with the following code:
Sub Format_charts()
With ActiveSheet.ChartObjects("Chart 6").Chart.Axes(xlValue)
.MaximumScale = Range("v18").Value
.MinimumScale = Range("u18").Value
End With
End...