search paragraph

[yacov]

Hi,
I have a long document, in which each paragraph has the sign "="
I would like to find paragraphs that due to an error do not contain the sign =
Is it possible?


Thanks
Yacov

[gmayor]

The following macro will highlight any paragraph without the '=' sign

Sub Macro1()
Dim oPara As Paragraph
    For Each oPara In ActiveDocument.Paragraphs
        If InStr(1, oPara.Range.Text, "=") = 0 Then
            oPara.Range.HighlightColorIndex = wdYellow
        End If
    Next oPara
End Sub

[yacov]

thanks a lot. works great