VBA参考图表名称

Question

为什么这不起作用:

ActiveSheet.ChartObjects("Sale").Axes(xlValue).MinimumScale = 1000

这样做:

  With ActiveChart.Axes(xlValue, xlPrimary)
    .MinimumScale = 1000
  End With

首先我这样做了:

ActiveChart.Parent.Name="Sale"

我无法做到这一点:

ActiveChart.Name="Sale"

我想特别提到图表"Sale",而不是ActiveChart.

Answer 1

ChartObject只是工作表上图表的"容器":您需要访问其Chart属性才能访问图表本身:

ActiveSheet.ChartObjects("Sale").Chart.Axes(xlValue).MinimumScale = 1000