0
我有一段代码，它应该插入基于表格的图表。它曾经工作，但现在它正在抛出运行时错误“438”对象不支持属性或方法”无法使用VBA插入图表
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 v。<2013]（https://msdn.microsoft.com/en-us/library/office/jj228277.aspx）上运行此代码？ – GSerg
噢....是的，你可以发布这个答案，以便我可以关闭此线程？ – Anarach