Visual Basic - Ayuda (comparar datos de una BD con excel)

Necesito comparar desde visual basic los datos que tengo en en una base de datos con los datos que se encuentran en un archivo de excel... es hacer una conciliacion de datos! como puedo hacerla?.. si alguin me puede dar una idea se lo agradeceria.
saludo y gracias

Gracias....

Segun recurdo hay un ejemplo parecido de Leer o Pasar es algo similar desde Excel a Visual Basic en codigo fuente de visual basic de esta pagina

le boy un ejemplo de algo parecido pero es mejor que busque en los dos ejemplos que ya tiempos encontre en esta pagina siempre en codigo Fuente de Visual Basic

Al usar CreateObject no nesesita hacer referencia de ninguna libreria

Dim FilMax As Long
Set ApExcel = CreateObject("Excel.Application")
ApExcel.Visible = True
ApExcel.SheetsInNewWorkbook = 3
ApExcel.Workbooks.Add
FilMax = Me.MSF.Rows

ApExcel.cells(2, 3) = "EMPRESA DE PRUEBA "
ApExcel.cells(4, 3) = "CLIENTES "
Fil = 6

Do Until j = FilMax
ApExcel.cells(Fil, 3) = MSF.TextMatrix(Fil, 1)
ApExcel.cells(Fil, 4) = MSF.TextMatrix(Fil, 2)
ApExcel.cells(Fil, 5) = MSF.TextMatrix(Fil, 3)
ApExcel.cells(Fil, 6) = MSF.TextMatrix(Fil, 4)
ApExcel.cells(Fil, 7) = MSF.TextMatrix(Fil, 5)
ApExcel.cells(Fil, 8) = MSF.TextMatrix(Fil, 6)
ApExcel.cells(Fil, 9) = MSF.TextMatrix(Fil, 7)
ApExcel.cells(Fil, 10) = MSF.TextMatrix(Fil, 8)
ApExcel.cells(Fil, 11) = MSF.TextMatrix(Fil, 9)
ApExcel.cells(Fil, 12) = MSF.TextMatrix(Fil, 10)
ApExcel.cells(Fil, 13) = MSF.TextMatrix(Fil, 12)
ApExcel.cells(Fil, 14) = MSF.TextMatrix(Fil, 13)
If Me.MSF.TextMatrix(Fil, 1) = "" Then Exit Sub
Fil = Fil + 1
j = j + 1
Loop

End Sub