2014-06-05 37 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