How to Update Range within a Loop using VBA

Question

I have three columns: names, accepted/synonym, synonyms of accepted names. The script is intended to cycle through the "accepted/synonym" column and when the value