No MS PowerPoint: Existe alguma possibilidade de excluir todos os slides que estão ocultos?
772
Tenho uma apresentação em PowerPoint que possui vários slides ocultos e gostaria de saber se existe a possibilidade de deletar todos os slides ocultos sem precisar fazer um por um.
Dim x as Long
For x = ActivePresentation.Slides.Count to 1 Step -1
With ActivePresentation.Slides(x)
If .SlideShowTransition.Hidden = True Then
.Delete
End If
End with
Next
1 respostas