Excel - Moviemiento de celda

Hola:
Quiero hacer lo siguiente en una macro pero no lo consigo.
Tras filtrar una columna por un campo determinado (esto lo haría a mano), quiero:
1º Ponerme en la primera fila y copiar el dato
2º Ir a la segunda “sheet” y en una columna buscar el dato copiado.
3º Tras buscar la fila en la que está, irme a la columna de la derecha y escribir un “*”
4º Volver al primer “sheet”, bajar a la siguiente línea y copiar el dato. etc

Range("A10").Select ‘primera fila de las filtradas
Selection.Copy ‘copia el nº 7021001012
Sheets("sheet2").Select
Range("A1”).Select
Cells.Find(What:="7021001012).Activate
Range("B44").Select ‘me he movido a la columna de la derecha
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "*" ‘escribo el asterisco
Sheets("sheet1").Select
Range("A25").Select ‘la segunda fila de las filtradas
Selection.Copy

Problemas:
- ¿Cómo le digo que What:=”Selection.Copy”, en vez del nº? Porque lo que intento me lo llama “verdadero”
- ¿Cómo me muevo una columna para la derecha? No existe algo del tipo ActiveCell.Field + 1?
- ¿Cómo me muevo una fila para abajo si ya están filtradas? Porque si estoy en la A10 y le digo ActiveCell.Row + 1, el pc piensa que la siguiente es la A11, cuando es la A25?

Gracias por vuestro tiempo.

En emagister te deje unos alcances sobre tu pregunta

Abraham

Así es. Y te lo agradezco mucho. Tiene buena pinta.