Macro for replacing cell if it meets multiple criteria

Hi Everyone,

I have a column of data with close to 80000 entries.

Each entry is a suburb. But the Data is corrupt. Instead of saying Brighton some say Bighton, Brghton, Brghtn.

I have copied entire column across to another column and deleted all duplicated and sorted alphabetically.

Now id like to write a macro that goes through the original data in Column A, and if a Cell Matches "Bighton, Brghton, Brghtn" to delete the contents and replace it with "Brighton".

Any help would be much Appreciated.

Regards,

Batrac