Macro para identificar valores repetidos

Hola,
buenas tardes.
Por favor agradezco su apoyo con una macro que: busque en una misma columna (Col. A) valores repetidos (A, C) y en la columna de la derecha (Col. B) coloque un código que identifique a los que son iguales (1-1 para valor A, 2-2 para valor C). Ejemplo:
Col. A Col. B
A 1
B
C 2
A 1
C 2
Gracias de antemano por su tiempo y dedicación.