gpt4 book ai didi

excel - 在 Excel 中使用 VBA 从 PowerPoint 模板创建新的 PowerPoint 演示文稿

转载 作者:行者123 更新时间:2023-12-04 13:35:31 24 4
gpt4 key购买 nike

我有一个 Excel 宏,可以从指定位置打开 PowerPoint 文件。 PowerPoint 文件是一个模板。

我需要根据模板设计创建一个新的演示文稿。

我的代码将打开模板而不是基于该模板的新演示文稿:

Sub Open_PowerPoint_Presentation()
'Opens a PowerPoint Document from Excel

Dim objPPT As Object

Set objPPT = CreateObject("PowerPoint.Application")
objPPT.Visible = True

'Change the directory path and file name to the location
'of your document

objPPT.Presentations.Open "C:\Users\Colin\Documents\Custom Office Templates\PowerPoint Templates\Edge45 Monthly Report Template Macro.potm"

End Sub

最佳答案

在我看来,您应该将 Untitled 参数(Open 方法)设置为 true 打开您的模板文件。

objPPT.Presentations.Open FileName:="MyTemplate Macro.potm", Untitled:=msoTrue

根据 Presentations.Open Method (PowerPoint) ,

Opens the file without a title. This is equivalent to creating a copy of the file.

关于excel - 在 Excel 中使用 VBA 从 PowerPoint 模板创建新的 PowerPoint 演示文稿,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/41666881/

24 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com