En algunas ocasiones es posible que estés trabajando con cierta información en Excel que no permite datos duplicados, por ejemplo códigos de empleado, de producto o algo similar.
En estos casos se puede restringir el ingreso de diferentes datos utilizando adecuadamente la opción Validación de datos, con esta se pueden colocar las condiciones explícitas que se ajusten a las necesidades de tu archivo y de esta forma garantizas que los datos ingresados son los correctos.
En el siguiente videotutorial aprenderás paso a paso y de forma práctica cómo aprovechar esta función. Espero que sea de gran ayuda para todos.
Powered by 
Hola soy nuevo visitando la pagina y por todo lo que he visto me ha sido de gran ayuda “gracias”
Hola Jose Luis: Me alegra que la estés aprovechando. Gracias por tus comentarios.
Saludos.
no ma.. mi amigo.. te doy mil gracias por el tuto de como evitar datos duplicados en excel.. me ayudaste mucho en hacer un base de datos… en hora wena y sigue. asi.. FELCIITACIONES.. salu2 desde guatemala
Con mucho gusto. Gracias por tus comentarios.
Saludos:)
Hola de nuevo. La mejor manera de evitar datos duplicados en una columna (en esta caso la A) es la utilización del evento change de la hoja en cuestión. La rutina quedaría así:
Private Sub Worksheet_Change(ByVal Target As Range)
valor = Target.Value
If Application.WorksheetFunction.CountIf(Columns(1), valor) > 1 Then
MsgBox “está duplicado, se eliminará el dato”
Target.ClearContents
Target.Select
End If
End Sub
un abrazo para tod@s
Hola Luis, recibe un cordial saludo. Excelente información, muchas gracias por tu valioso aporte. Bienvenido a este espacio. De nuevo gracias por compartir tus conocimientos.
Saludos
Estimado Juan Camilo, he estado viendo el video de como evitar datos duplicados y me parece buenda idea pero con una salvedad: Es posible saltarse la regla impuesta en la validación copiando y pegando un valor ya existente, haciendo esto último no nos avisa del dato duplicado.
Lo mejor sería lanzar la siguiente rutira para eliminar o pintar los duplicados:
Sub duplicados()
Do While ActiveCell.Value “final” ‘ponemos la palabra final a continuación del último dato
If ActiveCell.Value = ActiveCell.Offset(1, 0).Value Then
ActiveCell.EntireRow.Delete ‘también se puede pintar= activecell.interior.colorindex =3
Else
ActiveCell.Offset(1, 0).Select
End If
Loop
End Sub
un fuerte abrazo,
Perfecto Luis, excelente información para tener muy en cuenta. Gracias por compartir y desde ya eres Bienvenido, estoy seguro que la comunidad lo agradecerá.
Saludos
gracias por el video. la verdad creo que esta muy bien explicado y todos los videos que me ha mandado estan muy interesantes, gracias..
Hola Joel, con mucho gusto. Gracias por tus comentarios.
Saludos!
Hola, recibe un saludo desde Venezuela. Excelente tutorial, de verdad me han ayudado mucho. Quiero hacerte un pregunta. ¿Cómo puedo hacer que al momento de ingresar datos (sobretodo números de Cédula de Identidad) excel me indique error en dos elementos:
1) Que el dato que se ingresa carece o exede la cantidad de dígitos
2) Que se está ingresando datos repetidos.
Te agradecería si me ayudas con esto.
Hola Deiwe, ejemplo de este tutorial explica lo que estás preguntando; simplemente aplícalo con tus datos. Utiliza la validación de datos según tu necesidad y listo. Cualquier duda adicional me cuentas. Gracias por tus comentarios.
Saludos!
Muchas gracias. y de verdad que eres de mucha ayuda y nos ayudas a ser mejores gracias a tu ayuda. felicidades y gracias por tu tiempo.
Hola Jonathan, con mucho gusto. Gracias a ti por tus comentarios.
Saludos!
Juanca:
Gracias por el video enviado me fue como siempre de mucha utilidad, gracias y adelante con tu labor que aunque muchas veces pasamos, miramos, usemos y utilicemos tus conocimientos aca dispuestos, no siempre nos tomamos el tiempo para escribirte agradeciendote
Hola Humberto, es con mucho gusto. Espero que sigas aprendiendo mucho más, muchas gracias por tus comentarios.
Saludos!
Una excelente labor y un muy buen aporte en el aprovechamiento de las potencialidades del Excel. Precisamente yo vengo realizando la utilización de Excel en la enseñanza de la programación, lógica matemática y matemática aplicada en Ingeniería. Muchas Gracias.
Hola Jorge, muchas gracias por tus comentarios. Te deseo éxitos en tu proyecto.
Saludos!