selecting ms word bookmarks using vba

fumei · #1 05-10-2013, 03:02 PM

Well if all you want to do is action the bookmarks, then just action the bookmarks. There is no need to select anything.

Code:

Sub HighlightBM_InTable()
Dim BM As Bookmark
For Each BM In Selection.Tables(1).Range.Bookmarks
   BM.Range.HighlightColorIndex = wdBlue
Next
End Sub

The code highlights the bookmarks - and only the bookmarks - in the table the selection is in. If you want to do all tables, there is no need to see if the selection is in a table. No selection is made at all.

Code:

Sub HighlightBM_InTable()
Dim BM As Bookmark
Dim oTable As Table
For Each oTable in ActiveDocument.Tables()
  For Each BM In oTable.Range.Bookmarks
    BM.Range.HighlightColorIndex = wdBlue
  Next
Next
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Word vs bookmarks, another instance <g>	eNGiNe	Word	6	12-05-2012 01:05 AM
VBA equivalent to selecting present word	KevinJ	Word VBA	2	11-05-2012 01:27 PM
Autocorrect in Word not selecting proper entry from list	Llewella	Word	4	05-12-2012 02:22 PM
Word 2007 bookmarks and protection	Stevejd58	Word	0	07-31-2011 11:53 AM
word 2007 bookmarks	Dawn	Word	0	07-14-2009 01:00 PM