將ppt複製到格式化的Excel中

我試圖從powerpoint複製到excel並試圖保持電源點格式化。將ppt複製到格式化的Excel中

For x = 1 To pptApp.ActivePresentation.Slides.Count 
    pptApp.ActivePresentation.Slides.Range(Array(x)).Select 
    pptApp.ActivePresentation.Slides.Range(Array(x)).Copy 
    pptApp.Windows(2).Activate   
    pptApp.ActiveWindow.View.Paste 
    pptApp.Windows(2).Activate 
Next x

我目前使用這個來做副本，它工作正常，但它不會複製格式。

任何想法如何實現這一目標？ Sp

來源

2011-09-08 Steven

你在哪裏複製到Excel？這段代碼看起來只是參考了powerpoint應用程序？我沒有看到任何地方的Excel參考。我錯過了什麼嗎？ – PaulStock

在PaulStock的有效觀點之上，當您從一個辦公應用程序粘貼到另一個辦公應用程序時，導入程序可以用許多不同方式解釋緩衝區。在你的情況下，你想確保Excel導入PPT幻燈片不是HTML，文本，BMP或任何其他，但作爲幻燈片對象。在交互模式下你可以使用PasteSpecial的命令，和VBA在Excel aequivalent 將

[SheetObject].PasteSpecial Format:="Microsoft PowerPoint Slide Object", _ Link :=False, _ DisplayAsIcon:=False

快速&髒測試：把這個代碼在片onDoubleClick觸發，更換[SheetObject]通過「我」，轉到PPT，從幻燈片（!!!）複製一張幻燈片，返回到Excel並雙擊一個單元格 - 然後！

（這裏是Office 2003 SP3）

來源

2011-09-09 06:54:24 MikeD

將ppt複製到格式化的Excel中

回答

相關問題