Finding Formatted Bulleted Paragraphs

If you are working with a large formatted document, you may want to use Find and Replace to search for different document elements. At some point you may wonder if there is a way to search for bulleted paragraphs. (You know--the ones you use the Bullets tool on the Formatting toolbar to create.) Unfortunately, there is no built-in way to do this. Word doesn't allow you to search for a "bulleted" attribute, nor does it allow you to search for the actual bullet or the tab character following the bullet.

One solution is to simply search for the paragraph indenting applied by the bullet format you want to find. Thus, if the format applies a half-inch indent, then you could search for that. Of course, that leaves the potential problem of finding other non-bulleted paragraphs with a similar indent.

Another solution is to make sure you always use styles to apply your bullets to paragraphs. Doing so allows you to quickly search for paragraphs formatted with the special style.

Still another solution is to create a macro that will search for bulleted paragraphs.

Sub FindBullet()
    Dim rngTarget As Word.Range
    Dim oPara As Word.Paragraph

    Set rngTarget = Selection.Range
    With rngTarget
        Call .Collapse(wdCollapseEnd)
        .End = ActiveDocument.Range.End

        For Each oPara In .Paragraphs
            If oPara.Range.ListFormat.ListType = _
               WdListType.wdListBullet Then
                oPara.Range.Select
                Exit For
            End If
        Next
    End With
End Sub

The best way to use the macro is to assign it to a button on a toolbar or assign it a shortcut key. Each time you invoke the macro, the next bulleted paragraph within the document is selected. When the end of the document is reached, the selection remains set to the last bulleted paragraph.

If you think that you may need to search for bulleted paragraphs quite a bit, one solution for future documents is to not use the Bullets tool to create these formats. Instead, define a style for your bulleted paragraphs, and use the style to do your formatting. Then you'll be able to search for the style--which is quite easy in Find and Replace--and find your bulleted paragraphs every time.