Traer valor que no está presente en la hoja

Es un gusto saludarlos nuevamente.

Por favor si es posible su ayuda con lo siguiente:

En la Hoja1 tengo una serie de códigos, en la Hoja2 tengo otra serie de códigos.
Necesito que en la Hoja1 traiga el código de la Hoja2 que no esta presente en la Hoja1.
¿Existe alguna fórmula que me ayude de manera automática a encontrar el valor que no está presente en la Hoja1?
Agrego imágenes para hacer más clara mi consulta. Muchas gracias!

1 Respuesta

Respuesta
2

Una opción es con una fórmula en la hoja2 y con funcionalidad de excel, por ejemplo:

- En la hoja2 en la celda B2 pon esta fórmula:

=CONTAR.SI(Hoja1!A:A,A2)

- Filtra en la hoja2 por la columna B los valores iguales a 0.

- En la hoja2, copia los datos filtrados de la columna A

- En la hoja1 al final de tus datos pega los valores.


Otra opción, ¿puede ser con macro?

Cuántas filas con datos tienes en la hoja1 y cuántas en la hoja2.

Si puede ser una macro!

En la Hoja1 tengo aprox. 100 filas con datos, en la Hoja2 también aprox. 100 filas con datos.

La idea es que en la Hoja1 se pegue al final de la columna A el código que no está contenido.

Agrego imágenes. Destaco en verde el dato que no esta presente y que hay que agregar en Hoja1.

Prueba la siguiente:

Sub CopiarCodigos()
  Dim c As Range, f As Range
  For Each c In Sheets("Hoja2").Range("A2", Sheets("Hoja2").Range("A" & Rows.Count).End(3))
    Set f = Sheets("Hoja1").Range("A:A").Find(c.Value, , xlValues, xlWhole, , , False)
    If f Is Nothing Then Sheets("Hoja1").Range("A" & Rows.Count).End(3)(2).Value = c.Value
  Next
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas