Replace Wa(end of cell) with WA(end of cell) in table (Word 2000)

M

MathKing

I want to find and replace Wa(end of cell mark) with WA(end of cell mark) in
a table. I can't find the end of cell mark as a special character to use in
the find and replace command in Word 2000. I have other such tasks to
perform. Can someone help me, please?
 
D

Doug Robbins - Word MVP

You may need to use a macro. The following code will do it for all of the
cells in the table in which the selection is located

Dim i As Long, j As Long
Dim rng As Range
With Selection.Tables(1)
For i = 1 To .Rows.Count
For j = 1 To .Columns.Count
Set rng = .Cell(i, j).Range
rng.End = rng.End - 1
If Right(rng.Text, 2) = "Wa" Then
rng.Text = Left(rng.Text, Len(rng.Text) - 2) & "WA"
End If
Next j
Next i
End With


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP, originally posted via msnews.microsoft.com
 
M

macropod

Hi MathKing,

Find: Wa^10
Replace: WA^10

with 'use wildcards'. Do note that this will also change 'Wa' immediately preceding paragraph marks elsewhere in the document if the
Find/Replace isn't limited to the table (eg by selecting the table).
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top