Is cursor in a spanning bookmark? (Wd2003)

Ian B · Guest

I have up to 40 bookmarks throughout a document with code generated names.
How can I determine whether the cursor is inside a spanning bookmark ( I
want to prevent the user inserting a bookmark inside a bookmark)

TIA

Ian B

Google · Sponsor

Greg Maxey · Guest

Crude but might serve your need.

Sub Test()
Dim oBM As Bookmark
For Each oBM In ActiveDocument.Bookmarks
If Selection.Range.InRange(oBM.Range) Then
MsgBox "Sorry, you can't insert a bookmark here."
Exit For
End If
Next
End Sub

--
Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.

Ian B wrote:

Ian B · Guest

Thanks Greg

Works like a charm

Have a great Holiday break.

Ian B

"Greg Maxey" <gmaxey@mvps.oSCARrOMEOgOLF> wrote in message
news:%23%23%23Pj9dRIHA.5184@TK2MSFTNGP05.phx.gbl...

macropod · Guest

How about:
Sub Test()
If Selection.Range.Bookmarks.Count > 0 Then MsgBox "Sorry, you can't insert a bookmark here."
End Sub

Cheers
--
macropod
[MVP - Microsoft Word]
-------------------------

"Greg Maxey" <gmaxey@mvps.oSCARrOMEOgOLF> wrote in message news:%23%23%23Pj9dRIHA.5184@TK2MSFTNGP05.phx.gbl...