Bookmark Range

[Jules]

I am trying to find the code to set the range for a bookmark to be the text
between 2 characters (maybe, $ and #) and then create a bookmark around this
text. I would only need to do this once in the document so do not need it to
loop or anything.

Would anyone know how I could set this up please?

 

[Doug Robbins - Word MVP]

Use:

Dim bmrange As Range
Selection.HomeKey wdStory
Selection.Find.ClearFormatting
With Selection.Find
Do While .Execute(FindText:="$^?^?#", Forward:=True, _
MatchWildcards:=False, Wrap:=wdFindStop, MatchCase:=False) = True
Set bmrange = Selection.Range
bmrange.Start = bmrange.Start + 1
bmrange.End = bmrange.Start + 2
ActiveDocument.Bookmarks.Add "mybookmark", bmrange
Selection.Collapse wdCollapseEnd
Selection.MoveRight wdCharacter, 1
Loop
End With


--
Hope this helps,

Doug Robbins - Word MVP

Please reply only to the newsgroups unless you wish to obtain my services on
a paid professional basis.

 

[Jules]

Thanks Doug. If you see this question again, please disregard it as I
couldn't find this one and reposted it and then found this one.