我有一个基于所选主题自动创建(组装)的演示文稿,以包括特定课程。创建并保存组装的演示文稿后,不需要的标题幻灯片会出现在每个部分的开头(每个标题幻灯片具有相同的自定义幻灯片布局名称)。我们的演示文稿通常具有许多单独的主题,从而产生了许多不需要的标题幻灯片。
我想运行一个VBA宏,以使用此自定义幻灯片布局标识所有幻灯片,然后删除这些幻灯片。看起来似乎不应该很难,但是我很难获得一系列适用的幻灯片。
有人可以协助吗?
感谢您
预期结果正在显示PowerPoint,而在组装过程中未创建任何不需要的标题幻灯片。
---更新----
我能够使用Count纠正错误。下面是有效的代码...我没有正确使用For...。现在可以工作
Sub dellay()
For x = 1 To ActivePresentation.Slides.Count
If ActivePresentation.Slides(x).CustomLayout.Name = "Title Slide" Then
ActivePresentation.Slides(x).Delete
On Error Resume Next
Next
End Sub