There are many text boxes with nothing inside in certain ppt file. How to delete all blank text box at one time?
Also, those blank text boxes reside not only one page of a file.
Super User is a question and answer site for computer enthusiasts and power users. It only takes a minute to sign up.Sign up to join this community
There is no direct way to delete only the empty text boxes in PowerPoint, but you can use a macro instead.
Dim SlideToCheck As Slide
Dim ShapeIndex As Integer
For Each SlideToCheck In ActivePresentation.Slides
For ShapeIndex = SlideToCheck.Shapes.Count To 1 Step -1
If SlideToCheck.Shapes(ShapeIndex).Type = msoTextBox And _ Not SlideToCheck.Shapes(ShapeIndex).TextFrame.HasText Then
Go back to PowerPoint, go to Developer Tab (activate Developer Tab below), press Macros, select the RemoveTextboxes() and click Run.
Done! This will detele all the empty text boxes from your PowerPoint presentation.
How make the Developer TAB appear