使图表轴位置低 – vba

由vba制作的图表的默认x轴位置在中间。 如何让图表上的轴显示在底部?

我目前的代码:

ActiveSheet.Shapes.AddChart.Select ActiveChart.SetSourceData Source:=Range("I3", Sheets("Main").Range("L3").End(xlDown).Address) ActiveChart.ChartType = xlLine With ActiveChart.Parent .Height = 400 .Width = 800 End With 

只需使用轴的TickLabelPosition属性即可:

 ActiveChart.Axes(xlCategory).TickLabelPosition = xlTickLabelPositionLow