vba - 应用程序定义或对象定义的错误

Question

所以我有一张名为“仪表板”的表格，上面有几个图表，但每周我都会将数据添加到这些图表所基于的表格中。包含此表数据的第二张表是“历史总计”，我想要的数据位于 A 到 E 列(包括标签和标题)。我正在尝试自动更新图表，但我不太清楚为什么这不起作用。这是我到目前为止的代码:
Sheets("Dashboard").Select

ActiveSheet.ChartObjects("Chart 4").Activate

ActiveChart.SetSourceData Source:=Sheets("Historical Totals").Range("A1", Range("E1").End(xlDown))
我试过分开我们的范围，它正在选择适当的数据，所以我真的不知道我在哪里犯了错误。

Answer 1

尝试以下。每次使用 Range 时都需要引用数据表:

Sheets("Dashboard").ChartObjects("Chart 4").Activate
ActiveChart.SetSourceData _
        Source:=Sheets("Historical Totals").Range(Sheets("Historical Totals").Range("A1"), _
                Sheets("Historical Totals").Range("E1").End(xlDown))