Identifying and renaming the cells using first character

Hi,

I have a sheet in which we store the country name from which we recd our accounts.. We have 4 country names i.e. India, Brazil, China & Japan. From this sheet the data is extracted in a pivot. Now the prob is that multiple people are working on this excel and at the end of it country names look somewhat liks this
IND
In dia
Ina

and many more combination. If there is a way I can tell a macro to read the first letter of the cell (say "I"), and if its I then it replaces the cell value with India.. and so on for other countries.. We keep getting more accounts so need a way to keep it dynamic.

Thanks for any help you can provide.