Powerpoint根据版式类型选择多张幻灯片并删除这些幻灯片

时间:2019-07-03 15:45:10

标签: powerpoint-vba

我有一个基于所选主题自动创建(组装)的演示文稿,以包括特定课程。创建并保存组装的演示文稿后,不需要的标题幻灯片会出现在每个部分的开头(每个标题幻灯片具有相同的自定义幻灯片布局名称)。我们的演示文稿通常具有许多单独的主题,从而产生了许多不需要的标题幻灯片。

我想运行一个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

0 个答案:

没有答案