Hi macropod
I have 2 small issues.

1. I ran the code and got the following error: String parameter too long.
I clicked "debug" and the following line was highlighted.

.Replacement.Text = "^&-" & Split(Split(FRList, vbCr)(j), vbTab)(1)

It got stuck at the place where it had to insert meaning of a word whose length was 493 characters with spaces.

2. At some places in the document, the meanings are already inserted in blue after the red bracketed words. For e.g.

Australia is an awesome country. (Australia) (is) (an) (awesome) great, lovely, pleasant (country) (.)

Can a modification be made in the code so that when it is run and it finds the word (awesome), it inserts the meanings only if there is no text in blue immediately following the closing bracket.