0

I have a PowerPoint presentation which have about 105 slides. On each slide, there is a Text Box named TextBox4. I want to delete all these text boxes.

I have tried some VBA code by Google Search. But that doesn't work.

Can anyone help me with VBA regarding this.

Improve this question
3
  • Could you please update the code to understand better
    – Linga
    Feb 21, 2016 at 16:19
  • We are not a script writing service. We expect users to tell us what they have tried so far (including any scripts they are using) and where they're stuck so that we can help with specific problems. Questions that only ask for scripts are too broad and are likely to be put on hold or closed. Please read How do I ask a good question?.
    – DavidPostill ♦
    Feb 21, 2016 at 17:53
  • I know it very well. Thank you very much. But what if you share knowledge instead of just suggesting me how to use.
    – Programmer
    Feb 22, 2016 at 9:20

1 Answer 1

Reset to default
1

Assuming you mean an ActiveX textbox like so:

enter image description here

You could use the following VBA code to loop through every sheet and delete the text box.

Sub DeleteTextBox()
    On Error Resume Next
    Dim PPSlide As Slide
    For Each PPSlide In ActivePresentation.Slides
        PPSlide.Shapes("TextBox4").Delete
    Next
End Sub
Improve this answer
0

You must log in to answer this question.

Not the answer you're looking for? Browse other questions tagged .