Visual Basic para Aplicaciones - Relacionar datos

Hola soy aficionado a VB para Excel pero no le he hallado
Tengo dos hojas (tablas) necesito saber que registros de la segunda tabla no estan en la primera, osea que busque un registro en toda la segunda tabla y me de un dato y luego el segundo y asi... algo muy parecido a realizar una conciliación bancara

Posiblemente lo que te voy a sugerir no sea muy elegante en terminos de codificación pero funciona

Supongamos que en la Hoja2 estan los datos que quieres buscar y en la Hoja1 aquellos contra los que quires comparar, entinces en la Hoja3 crearemos la relacion de los datos que estan en la Hoja1 y no en la 2:

Inserta este codigo en un modulo

Public FilaReporte As Long
Public FilaBuscar As Long
Dim Registro As Variant 'Para evitar problemas con númericos y texto
Dim Tabla As String
Dim Encontrado As Integer

Public Sub Buscar()
NumReg = 0
FilaReporte = 0
Sheet1.Select
Sheet1.Range("A1").Select
Range(ActiveCell, ActiveCell.End(xlDown)).Select
Tabla = Selection.Address
Sheet2.Select
Sheet2.Range("A1").Select
Range(ActiveCell, ActiveCell.End(xlDown)).Select
NumReg = Selection.Count
For FilaBuscar = 1 To NumReg
Encontrado = 0
Registro = Sheet2.Cells(FilaBuscar, 1)
Encontrado = WorksheetFunction.CountIf(Sheet1.Range(Tabla), Registro)
If Encontrado = 0 Then
FilaReporte = FilaReporte + 1
Sheet3.Cells(FilaReporte, 1) = Registro
End If
Next FilaBuscar
End Sub

En la hoja3 columna1 quedaran los registros que estan en 2 y no estan en 1

Es con gusto

Saludos

Muchas gracias tu código me ha servido en dias anteriores te mande un mail pero no me contestaste