无法使用VBA插入图表
我有一段代码，它应该插入基于表的图表。它曾经工作，但现在是抛出运行时错误“438”对象不支持属性或方法“
Range("P4:AC6").Select ActiveSheet.Shapes.AddChart2(276, xlAreaStacked).Select ActiveChart.SetSourceData Source:=Range("'BU wise Summary'!$P$4:$AC$6") ActiveChart.ClearToMatchStyle ActiveChart.ChartStyle = 283 ActiveChart.Parent.Cut Sheets("Charts").Select Cells(204, 7).Select ActiveSheet.ChartObjects.Select ActiveChart.ChartArea.Select ActiveSheet.ChartObjects.Delete ActiveSheet.Paste 有人可以让我知道什么是错误？
Excel 2013中添加了 Shapes.AddChart2 。
在Excel 2013+上运行macros或使用旧的方法 。