Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

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

330 views
Skip to first unread message

MathKing

unread,
Jan 2, 2010, 7:44:01 PM1/2/10
to
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?

Doug Robbins - Word MVP

unread,
Jan 2, 2010, 11:00:50 PM1/2/10
to
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

"MathKing" <Math...@discussions.microsoft.com> wrote in message
news:74EDF920-AC2B-41FA...@microsoft.com...

macropod

unread,
Jan 2, 2010, 11:51:15 PM1/2/10
to
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).

--
Cheers
macropod
[Microsoft MVP - Word]


"MathKing" <Math...@discussions.microsoft.com> wrote in message news:74EDF920-AC2B-41FA...@microsoft.com...

0 new messages