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