如何使用 VBA 将图表的源数据设置为 table 内容?

How to set the source data of a chart to table content using VBA?

我想知道为什么这段代码不起作用。当我想将图表的数据源调整为动态 table (=ListObject).

时,最后一行出现错误

有什么想法吗?谢谢!

Sub test()

Dim WSfollowers As Worksheet
Set WSfollowers = ActiveSheet

Dim chartFollowers As ChartObject
Set chartFollowers = WSfollowers.ChartObjects("chart_followers")

Dim TBL As ListObject
Set TBL = WSfollowers.ListObjects("tbl_followers")

chartFollowers.SetSourceData Source:=TBL.Range

End Sub

请替换:

chartFollowers.SetSourceData Source:=TBL.Range

chartFollowers.Chart.SetSourceData Source:=TBL.Range

只有 ChartObjectChart 属性 有 SetSourceData 属性...

现在,根据您需要完成的事情,您还可以使用TBL.DataBodyRange