Me pueden apoyar con una macro para comparar columnas
anexo el ejemplo
saludos






Sub comparar()
Dim X, Y As Integer
X = 2
Y = 2
Do While Cells(X, 2) <> ""
If Cells(X, 1) = Cells(Y, 2) Then
Cells(X, 3) = Cells(X, 1)
Y = Y + 1
End If
X = X + 1
Loop
End Sub




Usuarios navegando por este Foro: victor_mrc7 y 7 invitados