Función o macro para encontrar y copiar

[choda125]

Perdona la pregunta, es que de verdad no se nada de esto.

Ese codigo lo puse dentro de un modulo pero le doy play y no pasa nada, Trate dentro de un comand button y tampoco. Los ejemplos de function que vi la ejecutan desde una celda pero tampoco me funciono de esa forma.
Otra cosa es donde y como pongo los parámetros FileName: DataFile: Count: (ejemplo Set FileName = "C:\Documents and Settings\Choda\Escritorio\Nueva\mydata100.CSV") me fallo tambien eso.

Tratando de analizar las cosas que va haciendo la funcion parece que tendria que andar de 10 .... pero denuevo pregunta en ninguna parte veo el comando copy ni paste ni nada parecido.

De verdad gracias por la ayuda que me estas dando,
Saludos