I have about 50 words I need to replace with a shortened version of that word. For example, Amethyst to AM, Aqua to AQ, Black to BLK etc. I will need to do this a few times over the next few weeks to new data. I've never used VBA but I'm excellent at copying, pasting and running Can someone help me by supplying the code?