PowerPoint图表的动态源数据答案

【问题标题】：Dynamic source data for powerpoint chartPowerPoint图表的动态源数据
【发布时间】：2017-03-28 11:53:04
【问题描述】：

PowerPoint幻灯片上图表上的数据取决于蓝线包围的数据。数据位于工作表上，当我右键单击图表后单击编辑数据时会弹出该工作表。

我正在尝试编写一个 vba 代码来设置数据源以包含所有数据，但到目前为止无济于事。我的代码如下：

Melon.Chart.SetSourceData _
Source:=Melon.Chart.ChartData.Workbook.Sheets(1).Range("B3:C" & (28 + Weekno))

Melon 是幻灯片上图表的名称。 Weekno 实际上代表 2017 年的周数，它是一个取决于当前周的变量。上述代码不断返回运行时错误“13”：类型不匹配错误，并且未将源数据设置为预期范围。

有人知道吗？所有帮助将不胜感激！谢谢！

【问题讨论】：

Weekno 是如何定义的？它是像Integer 或Long 这样的数字类型吗？运行代码时它有什么价值？你能把剩下的代码贴出来吗？
试试这个：Melon.Chart.SetSourceData _ Source:=Melon.Chart.ChartData.Workbook.Sheets(1).Range("B3:C" & Cstr(28 + Weekno)))
@RyanWildry Weekno 是 Integer。我附上了我的代码供您参考。谢谢。
@SteveRindsberg 谢谢史蒂夫。我已经实施了您的建议，并附上了结果的屏幕截图。
'With Melon.Chart.ChartData .Activate .Workbook.Sheets(1).ListObjects("Table1").Resize Range("$A$1:$C$29") End With'跨度>

【解决方案1】：

With Melon.Chart.ChartData
    .Activate
   .Workbook.Sheets(1).ListObjects("Table1").Resize Range("$A$1:$C$29")

End With

这行得通！！！！好开心

【讨论】：