Replace text of textboxes

		Microsoft Office Forums > Microsoft Word > Word VBA
Replace text of textboxes

FAQ

Thread Tools

Display Modes

12-22-2013, 05:23 PM

macropod

Windows 7 32bit Replace text of textboxes

Office 2010 32bit

Administrator

Join Date: Dec 2010

Location: Canberra, Australia

Posts: 22,536

I don't see any reference to textbox a named "NBL-02" in your code which, it seems to me, could be reduced to:

Code:

With ActiveDocument.Shapes("NBL-02").TextFrame.TextRange.Find
  .Text = old_text
  .Replacement.Text = "400"
  .Forward = True
  .Wrap = wdFindContinue
  .Format = False
  .MatchCase = False
  .MatchWholeWord = False
  .MatchWildcards = False
  .MatchSoundsLike = False
  .MatchAllWordForms = False
  .Execute Replace:=wdReplaceAll
End With

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

« Previous Thread | Next Thread »

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Macro to find text and replace with form field containing that text	iiiiifffff	Word VBA	16	06-04-2016 01:47 AM
Locked document with checkboxes AND textboxes	Georg1e	Word	1	03-01-2013 01:26 PM
<object> reference appearing next to textboxes	bblouin	Word	0	10-19-2012 08:50 AM
Select all textboxes in Word document	msword270	Word	1	01-12-2012 11:41 AM
Many textboxes on top of each others?	Giygas	PowerPoint	1	12-05-2010 02:59 PM

Other Forums: Access Forums

All times are GMT -7. The time now is 07:34 AM.