Excelgraphics轴自动resize
我有下面的代码绘制散点图。 有没有一个优雅的方式来调整绘图区域的大小，使x轴和y轴不总是自动从零开始，而是低于最低值？ 目前所有的数据点都聚集在一个angular落里。 非常感谢！
Set cht = ActiveChart 'GRAPH 1 Set rng1 = ActiveSheet.Range(Range("AC13").Offset(jump * 50, 0), Range("AG23").Offset(jump * 50, 0)) With ActiveSheet.ChartObjects.Add(Left:=rng1.Left, Width:=rng1.Width, Top:=rng1.Top, Height:=rng1.Height) '(Left:=100, Width:=375, Top:=75, Height:=225) .Chart.ChartType = xlXYScatterLines .Chart.HasLegend = False .Chart.Axes(xlCategory).TickLabels.Font.Size = 18 .Chart.Axes(xlValue).TickLabels.Font.Size = 18 '.Chart.SetSourceData Source:=Range("U13:O40,T13:N40") Set srs = .Chart.SeriesCollection.NewSeries srs.XValues = Range(Range("U13").Offset(jump * 50, 0), Range("U13").Offset(jump * 50, 0).End(xlDown)) srs.Values = Range(Range("T13").Offset(jump * 50, 0), Range("T13").Offset(jump * 50, 0).End(xlDown)) End With 如果你的y范围数据在ActiveSheet单元格B1:B10中，那么你可以使用这样的代码来开始范围的最低值的90％（即正下方）
Set cht = ActiveChart cht.Axes(xlValue).MinimumScale = 0.9 * Application.Min([b1:b10])
看一下这个教程： 在Excel VBA中计算漂亮的轴比例