Copiar, buscar y pegar

Buen día, necesito una gran colaboración en una macro.

requiero copiar el contenido de una celda, pasar a otra hoja accionar el buscar, y que al encontrarla pasar a la siguiente celda y pegarla en la hoja inicial.

Ejemplo para mejor comprensión:

Copiar celda A1 de la hoja 1

pasar a la hoja 2 y buscar los copiado anteriormente que se encuentra en la columna A de la hoja 2, cuando lo encuentre pasa a la siguiente columna (B) de ésta misma hoja, copie el dato y lo pegue en cualquier celda de la hoja 1

Gracias a la colaboración que me puedan brindar.