microsoft.public.word.vba.general

Here's how the code eventually ended up:

Sub FindJumpCode()
' For source of ideas for this code,
' please visit the Microsoft URL
'
' http://www.microsoft.com/communities/
'newsgroups/en-us/default.aspx?dg=
'microsoft.public.word.vba.
'general&tid=1df9ba00-
'79e5-421b-9ffd-6cacec9d4f1d&cat=
'en_US_eb67b351-9403-4888-a42c-
'b2b58efec0aa&lang=en&cr=US&sloc=en-us&m=1&p=1
'
'That's all one url, and you'll need to
'remove the carriage returns in Notepad and
'paste it into thy browser.
'
Selection.Find.ClearFormatting
With Selection.Find
.Text = "??"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
If Selection.Find.Execute Then
Selection.Delete ' Unit:=wdCharacter, Count:=1
Else
MsgBox "No Jump Code"
End If
End Sub