Delete all text boxes in Word 2010

Posted on 2013-09-26
Medium Priority
Last Modified: 2013-10-20
How do you delete all text boxes and their contents in Word 2010?  I am guessing I will need a macro to remove them all.
Question by:techtrainlady
  • 2
LVL 18

Expert Comment

by:Steven Harris
ID: 39525122
Are they drawing text boxes?

Sub Q_28250528()
       Dim wShp As Word.Shape
       Dim i As Long
       For i = ActiveDocument.Shapes.Count To 1 Step -1
       Set wShp = ActiveDocument.Shapes(i)
          If wShp.Type = msoTextBox Then
          End If
       Next i
End Sub

Open in new window


Author Comment

ID: 39525150
It worked beautifully!  I removed all text boxes and contents from a 160 page document in a second!
LVL 18

Accepted Solution

Steven Harris earned 2000 total points
ID: 39525180
Glad it helped!

Featured Post

The 14th Annual Expert Award Winners

The results are in! Meet the top members of our 2017 Expert Awards. Congratulations to all who qualified!

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Many companies are making the switch from Microsoft to Google Apps (https://www.google.com/work/apps/business/). Use this article to learn more about what Google Apps has to offer and to help if you’re planning on migrating to Google Apps. It is …
Ever visit a website where you spotted a really cool looking Font, yet couldn't figure out which font family it belonged to, or how to get a copy of it for your own use? This article explains the process of doing exactly that, as well as showing how…
The viewer will learn how to simulate a series of sales calls dependent on a single skill level and learn how to simulate a series of sales calls dependent on two skill levels. Simulating Independent Sales Calls: Enter .75 into cell C2 – “skill leve…
If you’ve ever visited a web page and noticed a cool font that you really liked the look of, but couldn’t figure out which font it was so that you could use it for your own work, then this video is for you! In this Micro Tutorial, you'll learn yo…

597 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question