Thanks so much Wild Bill - you are a genius.

So sorry that I am only replying now. Was busy with other parts of the project and didn't get a chance to check if anyone had replied.
This works perfectly.

For others using this code, don't forget to

dim word as string = txtFind_CV.Text

Again, Wild Bill, thanks so much.