Copiar Datos de libro a otro Libro con Criterio

Espero me puedan ayudar, intento realizar un código en el cual requiero copiar los datos de un libro de origen a un libro de destino en donde en ambos en la columna A tengo unos Códigos "A0001","A0002" etc como primera criterio. Ahora el detalle es que en ambos archivos tengo títulos, "nombre", "apellido","edad","pais" etc.. Pero no se encuentra en las mismas columnas. Con esto lo que requiero es que al poner mi criterio de CODIGO Y NOMBRE me busque la información en la hoja de Origen y me lo coloque en el destino en la manera correcta y si en una columna no tiene titulo se brinque esa columna y continue la macro hasta copiar todos los titulos del archivo origen... Por ejemplo Criterio de busque Celda(11,1 "Codigo", ) Celda (10,2) nombre Carpeta Destino buscarlo en carpeta de origen Celda (11,1) y Nombre celda (10,15) nota: el criterio de nombre puede variar de rango