Necesito una macro de Excel de búsqueda

¿Y dónde copia los datos de la columna b, c, de?

Hola en f, g y h de sepsa

Hola olvide decir algo, los valores, algunos son exactos y otros fallan por centavos es decir en la hoja puede venir 12000 y en la otra 12000.50 o bien 13000 y 13000
Saludos y de nuevo mil gracias!

Coloca la rutina que te estoy enviando en un módulo de Visual Basic. ¿Cómo?
     * Abre el Editor de Visual Basic Alt-F11
     * En el Menú de Opciones, haz click en el Menu Insertar y luego selecciona Módulo.
     *En el módulo que aparece, copia el siguiente codigo ;
Sub Importar()
    Application.ScreenUpdating = False
    Workbooks.Open Filename:="BANCOS.xls"
    Workbooks.Open Filename:="SEPSA.xls"
    Range("D2").Select
    Do While ActiveCell <> ""
        Dato = ActiveCell
        Windows("BANCOS.xls").Activate
        Range("A1").Select
        Do While ActiveCell <> ""
            If ActiveCell = Dato Then
                Dato1 = ActiveCell.Offset(0, 1)
                Dato2 = ActiveCell.Offset(0, 2)
                Dato3 = ActiveCell.Offset(0, 3)
                Windows("SEPSA.xls").Activate
                ActiveCell.Offset(0, 2) = Dato1
                ActiveCell.Offset(0, 3) = Dato2
                ActiveCell.Offset(0, 4) = Dato3
                Exit Do
            End If
            ActiveCell.Offset(1, 0).Select
        Loop
        Windows("SEPSA.xls").Activate
        ActiveCell.Offset(1, 0).Select
    Loop
End Sub
      * Cierra el Editor de Visual Basic
Ahora ejecuta la macro así :
     * Alt-F8 - selecciona Importar - Ejecutar
Algunas consideraciones :
-- Los archivos SEPSA y BANCOS deben estar en la misma carpeta que el libro donde coloques esta rutina. Si archivos se encuentran en otras carpetas, deberás especificar la ruta completa de cada archivo.
-- Los archivos SEPSA y BANCOS quedan abiertos al final de la rutina para tu revisión. Opcionalmente puedes incluir estas lineas a la rutina ¿entre el ultimo Loop y End Sub)   para cerrar uno o ambos archivos.
Windows("BANCOS.xls").Close
Windows("SEPSA.xls").Close savechanges:=True

¿Hola cómo estamos?
Que crees que no me funciono, mira te pongo un ejemplo de como esta
SEPSA FILA 2 datos a comparar columna d
A B C D E (aquí se comienzan a pegar los datos)
1 38285393 06/07/2009 12,436.00 13
BANCOS FILA 4 datos a comparar columna H
A B C D E F G H
109 220709 2003 960305 BANOBRAS, SNC F/2003 (FONDO DE 859 1 1 0 75593071
Cada una de las hojas tiene como 4000 filas, lo que necesito es que la columna "d" de SEPSA, se compare con la columna "H" de bancos, cuando por ejemplo en "d2" de SEPSA este en "H200" deberá copiar los datos de la columna A200, D200 y H200, y así por cada valor que encuentre deberá pegarlo en su respectiva fila en el archivo SEPSA, espero haberme explicado bien.
De antemano te agradezco de nuevo todo el tiempo que me has dedicado, muchas gracias!, ¿Oye no tendrás messenger o correo?, saludos y buen fin de semana!