Find given text and number each line incrementally

Hi All

I'm trying to search and find lines in my Word document which contain the letters 'bx' , and then place an incrementing number by the line above in each.

For example

AAAAA
123456BX67

nnnnn
8976BX55

ioip
18987BX34


would become


01.AAAAA
123456BX67

02.nnnnn
8976BX55

03.ioip
18987BX34

The 'bx' in each might be upper or lower case.

Could someone suggest some VBA to satisfy this?

Grateful for any advice.

many thanks gmaxey. I gave it a go and find it gives an error for some scenarios. It says 'Object variable or With block variable not set'. Other times it works fine.

The debug screen highlights this line :

Please Login or Register  to view this content.

I'll check through to see if it's the 'enter' at the end of each line which is the issue.