VBA Excel圖表到PowerPoint-將文件另存為多個輸出

Question

我在excel中有一個模板，還有一個PowerPoint模板。

在PowerPoint模板中，我有幾個與excel模板鏈接的圖表。

我想做一個循環，以更改excel中的某些內容，以便圖表更新為excel和powerpoint文件的“ saveas”，所以我有例如。 模板均構建了100個不同的excel文件和100個不同的powerpoint文件。 我希望能夠手動更改那100個excelfile中的一些數據，而指向powerpoint的鏈接仍然完好無損，因此如果需要，它們也將進行更新。

但是，當我打開PowerPoint模板時，右鍵單擊圖表並選擇“編輯數據”，那么該圖表仍鏈接到excel模板，而不是excel文件的saveas版本嗎？

如何將Powerpoint中圖表的鏈接更改為其他Excel文件名？ 兩個Excel文件中的結構相同。

該圖表在excel中創建，並復制/粘貼為“保留源格式和鏈數據”（從丹麥語翻譯而來）

任何幫助將不勝感激。

我還嘗試了一種解決方案，其中通過vba將復制/粘貼復制到一個空的Powerpoint模板中，但這比較耗時，並且Powerpoint經常崩潰。

Answer 1

假設您對由oSh中的鏈接圖表表示的形狀有引用，則將向您顯示鏈接：

Debug.Print oSh.LinkFormat.SourceFullName

並將其更改為其他文件：

oSh.LinkFormat.SourceFullName = "c:\some\path\yourfile.xls"

很可能在yourfile.xls之后還會有！chartname之類的名稱……您需要包括該名稱。

並首先保存Excel文件，然后更改PPT中的鏈接以指向它們。 如果將鏈接更改為指向不存在的文件，則PPT不會引發任何錯誤； 只需保持鏈接不變即可。