如何在PowerPoint中使用VBA「取消分組」圖片

Question

我有一張帶有圖片幻燈片（wmf/emp文件）的PowerPoint文件，我想使用VBA將其中的圖片元素「取消組合」。

我需要問PowerPoint兩次才能做到這一點 - 但是這樣做。

可以使用VBA完成嗎？如果是這樣，怎麼樣？

Answer 1

這是相當簡單 - 從幫助文件：

這個例子取消組合任何分組 形狀和拆卸上myDocument中的任何圖片或 OLE對象。

Set myDocument = ActivePresentation.Slides(1) 
For Each s In myDocument.Shapes 
    s.Ungroup 
Next 

你可能需要做一些錯誤，如果它不能解組，如JPG檢查，以及一些類型檢查（即If s.Type = msoPicture...）

Answer 2

沒有直接回答這個問題，但。 ..

找出如何使用VBA自動化辦公應用程序的最佳方法是record a macro and then look at the code that gets spit out。