2014-06-05 35 views
-3

我有一個嵌入了3個Powerpoint演示文稿(作爲對象)的excel文件。這些是我想要準備的套牌的空白模板。我如何通過VBA分配這些嵌入式Powerpoint演示文稿。我知道我可以分開保存Powerpoint演示文稿並訪問它們,但這次我想將它們製作成一個文件。在此先感謝使用vba更新嵌入到excel中的Powerpoint

+0

你到底想幹什麼?你的問題根本不清楚。另外,請包括迄今爲止您嘗試的內容?請顯示你的代碼。這裏有一個提示:嵌入的OLEOBjects是'Slide'上的'Shapes'集合的成員。它們可以通過'.Name'或索引位置訪問。請注意,使用OLEObjects通常是一種非常低效的處理方式,而且它們非常難以使用。如果我知道更多關於你實際想要做的事情,我可以推薦一些替代方案... –

+0

這樣的事情?您的工作簿中已將PPT作爲OLE對象嵌入。您希望使用此嵌入式PPT作爲您想要通過Excel中的自動化創建新演示文稿的基礎。您可以激活嵌入的PPT對象並告訴隨後的PPT實例以任何名稱保存激活的演示文稿,以便爲您提供新的PPT演示文稿。 –

回答

0

OK,假設你有嵌入Excel中的PPT演示,它的名字是「對象1」

Dim oSh As Shape 

Set oSh = ActiveSheet.Shapes("Object 1") 

With oSh 
    ' Uncomment the appropriate line for the result you want 

    ' Show 
    '.OLEFormat.Verb (1) 

    ' Edit (in place) 
    '.OLEFormat.Verb (2) 

    ' Open 
    .OLEFormat.Verb (3) 

End With