atw: Re: pdf converted to doc with text boxes containing content.

  • From: Neil Maloney <maloneyn@xxxxxxxxxxx>
  • To: austechwriter@xxxxxxxxxxxxx
  • Date: Fri, 02 Sep 2011 09:41:47 +1000

Warren,

This does the trick, I have tested it:


Sub RemoveTextbox()

Dim MyBox As Shape
For Each MyBox In ActiveDocument.Shapes
With MyBox
        .Select
        .Line.Visible = msoFalse
        .ConvertToFrame
    End With
Next MyBox

Dim MyFrame As Frame
For Each MyFrame In ActiveDocument.Frames
    MyFrame.Select
    MyFrame.Delete
Next MyFrame

End Sub


Sourced from:

http://groups.google.com/group/microsoft.public.word.docmanagement/browse_thread/thread/c74f8d7dca0cc56a/c0d953b51959621c?lnk=st&q=word+convert+text+boxes+to+frames#c0d953b51959621c

And I got that link from:

http://www.techtalkz.com/microsoft-office-word/189766-remove-text-boxes.html

Neil.



On 2/09/2011 9:29 AM, Lewington, Warren wrote:
Hi all.
Anyone have a macro that will remove content from text boxes in Word and paste it into the document or can point me to a macro repository where one exists?
 
Warren Lewington
Technical Writer | Control Systems Delivery | Communications & Control Systems | Asset Operations Group | RailCorp
 
************************************************** To view the austechwriter archives, go to www.freelists.org/archives/austechwriter To unsubscribe, send a message to austechwriter-request@xxxxxxxxxxxxx with "unsubscribe" in the Subject field (without quotes). To manage your subscription (e.g., set and unset DIGEST and VACATION modes) go to www.freelists.org/list/austechwriter To contact the list administrator, send a message to austechwriter-admins@xxxxxxxxxxxxx **************************************************

Other related posts:

  1. Home
  2. austechwriter
  3. Archive
  4. 09-2011