VBA - 如何在Excel中选择特定图表并将其粘贴到功率点的单个幻灯片上

Question

我有以下代码：

1

如何选择特定图表，如图1中的图表1，图2中的图表2中的excel，并将它们粘贴到powerpoint中的单个幻灯片上？

Answer 1

这将遍历工作簿中的所有工作表，然后只检查您要查找的图表。如果图表在sheet1上被命名为chart1，那么......

Set wb as activeworkbook
For Each sht In wb.Worksheets
  For Each cht In sht.ChartObjects
    'check for name of chart, if statements or a case select statement.
    if cht.name = "Chart" & sht.index then

        'Copy to PPT
    end if

  Next cht
Next sht