如何更改直方图的源数据

Question

这会在内置的直方图图表中生成错误消息，但仍会更改源数据。如果我将图表类型更改为其他类型，例如折线图，条形图或饼形图都可以正常工作，并且不会显示任何错误消息。直方图在做错什么？

Dim sht As Worksheet

Dim cht As ChartObject

Set sht = Sheets("Sheet1")

Set cht = sht.ChartObjects("Chart 1")

    cht.Chart.SetSourceData Source:=sht.Range("D2:D16")

我希望它会更改直方图图表的源数据，就像其他图表类型一样，但是会弹出此消息并阻止宏的其余部分运行：

  

运行时错误'445'：对象不支持此操作