Another find and replace problem

  • Thread starter Thread starter Maria
  • Start date Start date
M

Maria

I just did a Word merge from an Excel database. Before
the first name on the first line of each label there is a
space. There isn't a space before the field code on the
main document, and there isn't a corresponding space in
the database.

How can I get this space out in one action on the 715
labels? I know you can do it.

Once more, thanks for educating me at such a reasonable
expense!
 
Maria,

Edit>Replace>Use Wildcards

Insert a space and then (<*^13) in the find field.
Type \1 in the replace field
Replacy all

Note: include the ( and ) in the find string exactly as shown above.
 
Thanks a million, Greg!
-----Original Message-----
Maria,

Edit>Replace>Use Wildcards

Insert a space and then (<*^13) in the find field.
Type \1 in the replace field
Replacy all

Note: include the ( and ) in the find string exactly as shown above.



--
Greg Maxey
A peer in "peer to peer" support
Rockledge, FL
To e-mail, edit out the "w...spam" in (e-mail address removed)



.
Click to expand...
 
Hi, Greg,

I tried inserting a space and then (<*13)and it removed
the offending spaces on the first lines, but it also
removed spaces between words in each succeeding line.
What I meant to say was how do I get it just to apply to
the first line of each label address.

Sorry I misstated my question. Hope you can help. And
thanks so much, Greg.

Maria
Fort Lauderdale
 
Run a macro containing the following code over the document

Dim i As Long, j As Long
For i = 1 To ActiveDocument.Tables(1).Rows.Count
For j = 1 To ActiveDocument.Tables(1).Columns.Count
ActiveDocument.Tables(1).Cell(i, j).Range.Characters(1).Delete
Next j
Next i


--
Please post any further questions or followup to the newsgroups for the
benefit of others who may be interested. Unsolicited questions forwarded
directly to me will only be answered on a paid consulting basis.
Hope this helps
Doug Robbins - Word MVP
 
Thank you forever, Doug! It worked.
-----Original Message-----
Run a macro containing the following code over the document

Dim i As Long, j As Long
For i = 1 To ActiveDocument.Tables(1).Rows.Count
For j = 1 To ActiveDocument.Tables(1).Columns.Count
ActiveDocument.Tables(1).Cell(i, j).Range.Characters(1).Delete
Next j
Next i


--
Please post any further questions or followup to the newsgroups for the
benefit of others who may be interested. Unsolicited questions forwarded
directly to me will only be answered on a paid consulting basis.
Hope this helps
Doug Robbins - Word MVP



.
Click to expand...
 
Back
Top