I have the following text in a document:

Answer A is correct.
Answer B is incorrect.
Answer C is incorrect.
Answer D is incorrect.

This is the output that I would like to get with a find and replace code :

Answer (A) is correct.
Answer (B) is incorrect.
Answer (C) is incorrect


Answer (D) is correct.

I tried to play with the following code given to me but can't get it to work.

Find = "([A-Z]).*[Aa]nswer*( is[ in]{1,3}correct.)"
Replace = "Answer (\1)\2"

Thanks!