-3
我有一个嵌入了3个Powerpoint演示文稿(作为对象)的excel文件。这些是我想要准备的套牌的空白模板。我如何通过VBA分配这些嵌入式Powerpoint演示文稿。我知道我可以分开保存Powerpoint演示文稿并访问它们,但这次我想将它们制作成一个文件。在此先感谢使用vba更新嵌入到excel中的Powerpoint
我有一个嵌入了3个Powerpoint演示文稿(作为对象)的excel文件。这些是我想要准备的套牌的空白模板。我如何通过VBA分配这些嵌入式Powerpoint演示文稿。我知道我可以分开保存Powerpoint演示文稿并访问它们,但这次我想将它们制作成一个文件。在此先感谢使用vba更新嵌入到excel中的Powerpoint
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
你到底想干什么?你的问题根本不清楚。另外,请包括迄今为止您尝试的内容?请显示你的代码。这里有一个提示:嵌入的OLEOBjects是'Slide'上的'Shapes'集合的成员。它们可以通过'.Name'或索引位置访问。请注意,使用OLEObjects通常是一种非常低效的处理方式,而且它们非常难以使用。如果我知道更多关于你实际想要做的事情,我可以推荐一些替代方案... –
这样的事情?您的工作簿中已将PPT作为OLE对象嵌入。您希望使用此嵌入式PPT作为您想要通过Excel中的自动化创建新演示文稿的基础。您可以激活嵌入的PPT对象并告诉随后的PPT实例以任何名称保存激活的演示文稿,以便为您提供新的PPT演示文稿。 –