Not exactly sure I understand, but maybe replaceAlso is their any way to reference the Abbrv like "GA" located in Column (A1) and instead of replace the GA it goes to Column (B1) and reads "South"
Call ActiveSheet.UsedRange.Replace
with
PaulCall ActiveSheet.Columns(1).Replace