Jump to content

Macro para identificar si el valor a ingresar ya esta.


Recommended Posts

Saludos, tengo este macro

Sub nuevos()

Dim ultimafila As Long

Dim Origen As Worksheet, Destino As Worksheet

Set Origen = Sheets("FORMATO")

Set Destino = Sheets("Hoja2")

ultimafila = Sheets("Hoja2").Range("B20000").End(xlUp).Row

ultimafila = ultimafila + 1

PERO POR ESTE LADO QUISIERA VERIFICAR SI LO QUE SE VA A INSERTAR EN LA CELDA K12 DE Origen YA EXISTE EN LA COLUMNA D DE Destino, PARA NO REPETIR LOS VALORES, si no esta repetido ps que inserte los siguientes datos, si no q muestre un mensaje de error y no ingrese los datos.

Destino.Range("B" & ultimafila) = Origen.Range("K10")

Destino.Range("D" & ultimafila) = Origen.Range("K12")

Destino.Range("E" & ultimafila) = Origen.Range("F8")

Destino.Range("F" & ultimafila) = Origen.Range("H8")

Destino.Range("G" & ultimafila) = Origen.Range("J8")

Destino.Range("H" & ultimafila) = Origen.Range("K16")

Destino.Range("I" & ultimafila) = Origen.Range("K14")

Destino.Range("J" & ultimafila) = Origen.Range("K18")

End Sub

pueden ayudarme por favor? Gracias.

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...

Important Information

Privacy Policy