使用vba更新excel中嵌入的Powerpoint

时间:2014-06-05 11:00:29

标签: excel vba excel-vba powerpoint powerpoint-vba

我有一个excel文件,其中嵌入了3个Powerpoint演示文稿(作为对象)。这些是我想准备的套牌的空白模板。如何通过VBA分配这些嵌入式Powerpoint演示文稿。我知道我可以单独保留Powerpoint演示文稿并访问它们,但这次我想将它们合并为一个文件。提前致谢

1 个答案:

答案 0 :(得分:0)

好的,假设您在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