Remove duplicates in Excel | VBA macro gift
HTML-код
- Опубликовано: 20 авг 2024
- ✅ Download the file | www.exceleinfo....
🏆 Subscribe | bit.ly/youtube...
📩 Tutorials in your email: www.exceleinfo....
In this video, we will see how to delete rows with duplicate values in Excel.
We will see the option to Remove duplicates and another with VBA macros.
More examples | www.exceleinfo.com
More examples | blogs.itpro.es/...
Facebook Page | / exceleinfo
Get notificacions on Telegram | t.me/EXCELeINFO
Twitter | @EXCELeINFO
Twitter | @SergioACamposH
Download EXCELeINFO addin:
addin.exceleinf...
#MsExcel #VBA
![Kodak Black - Sharp Vibes [Official Music Video]](http://i.ytimg.com/vi/oEV0OoLJeIs/mqdefault.jpg)
Saludos Sergio desde Costa Rica, excelente video, claro y preciso. Me ha ayudado mucho ya que estoy desarrollando un sistema y tenia este inconveniente para eliminar duplicados. Muchas gracias
Sergio, que gran aporte es tu canal. Te saludo desde Chile.
Eres muy bueno con tus macros es por eso que me encanta ver tus vídeos. EXCELente Tarde. Cuidate mucho y hasta pronto.
Wooooo estoy empezando el curso de macros en este canal.. de verdad muuuy pero muuuuy bueno explicando de lo mejor.. nuevo sub
Espectacular, la mejor explicación de este tema que he visto ahora. Enhorabuena.
Con este video me has puesto sobre la pista de una posible solución a la parte de un proyecto en el que estoy.
Gracias por tu tiempo.
Saludos desde 🇪🇸
Muy clara la explicación, muchas gracias Sergio!! Lo implemente en mi proyecto y me funciono sin problema, por ahora me encuentro pensando cómo hacer para que me deje el menor valor de los duplicados. Un saludo y nuevamente muchísimas gracias!!
Sergio, muy agradecido con todo lo que haces por enseñarnos, te pido un permiso para compartir este código para eliminar celdas duplicadas, trato de explicarla.
Sub duplicados()
ActiveSheet.Range("B3:F" & Range("E" & Rows.Count).End(xlUp).Row).RemoveDuplicates Columns:=Array(1, 2), _
Header:=xlNo
End Sub
Explico:
'Hoja Activa, con rango donde inicia hasta donde termina.
'ActiveSheet.Range("B3:F" & Range("E" & Rows.Count).End(xlUp).Row)
' Cantidad de Columnas que quiero validar que se duplican y eliminarlas.
'Columns:=Array(1, 2)
Sergio excelente la calidad y claridad de tus videos. Estoy haciendo el curso de macros y me parece fantástico. Gracias por tu tiempo y compartir tus conocimientos.
Una pequeña corrección:
Do While es un bucle que se ejecuta mientras se cumple una condición (y deja de ejecutarse cuando dicha condición deja de verificarse). El bucle que se ejecuta hasta que se cumpla una condición es el Do Until. Pueden usarse indistintamente para el mismo fin si la prueba lógica o condición se plantea correctamente, ya que Do While A es equivalente a Do Until No A.
Un abrazo fuerte desde Argentina y nuevamente muchas gracias!
Thanks, necesitaba hacer eso para agregar los datos no repetidos a un select de un formulario
Para cuando su continuación del video, muy bueno sería usar vba usando más de dos variables
Impresionante Sergio. Como siempre muchísimas gracias por tan buen trabajo.
Hay tantas maneras de crear una macro pero siempre usas el modo mas concreto y seguro de escribirlas. Gracias. Una inquitud o tema a desarrollar. Si quiero eliminar los duplicados pero sumar los valores correspondientes, es decir, si en la columna 4 del ejemplo estarían los valores de ventas y quisiera unificarlas por vendedor y sucursal... Saludos.
Muchas Gracias Sergio! muy bueno el video
Excelente video. Muchas gracias Sergio.
Buen ejemplo esta macro, Sergio. Gracias.
Hola Sergio, Como REalizar una Macro que me permita registrar varios vectores, estos vectores se deben crear para alamcenar una serior de numeros (Rangos, 1 al 20 ) por ejemplo otro vector alamacene del rango (21 - 40) y que se puede ir sacando esos numero de los vectores, que al final cuando el vector este vacío se elimine, o que se muestre con los números que un posea
.
Sergio excelente explicación como siempre, tengo una base de datos con más de 5000 registros y necesito colocar formato a los números que se repiten en la columna A quizás tienes alguna macro que cumpla ese objetivo.
Sí, ya tengo una macro en el canal, pero no sería mejor Formato condicional?
Necesito agregar bordes a la selección de números que se repite es decir:
1
1
2
2
2
2
3
3
3
La busque en la página y no la encontré que nombre tiene mil gracias por tu ayuda.
Saludos. Y cómo sería que en vez de eliminar los duplicados, pueda modificarlos a todos con un solo boton??.
Gracias por su atención valiosa.
Hola Sergio , yo tengo una tabla donde están todos los datos. En la misma hoja al costado de la tabla traslade todos los repetidos y allí aplique la macros. Pero eliminas toda la fila, "ActiveCell.EntireRows(1).Delete". Yo deseo eliminar solo las celdas donde está el duplicado.
Gran video!! Hay alguna posibilidad de eliminar datos duplicados de dos bases de datos distintas en diferentes hojas? Gracias!
Te recomiendo unir esas bases en una sola con Power Query y ahí quitar duplicados. Revisa mi curso de Power Query.
Muchas gracias por su aporte maestro, yo sigo mucho su pagina, tengo una duda, el código de eliminación solo funciona en solo texto, pero que pasa si lo que quiero que me elimine en vez de que diga Vendedor 1, vendedor 2, sean folios numericos repetidos, ejemplo que sea, 1,1,1, 2,2, 3,3,3,3, 4,4,4 y que elimine los duplicados numericos.
Ya no maestro, ya le encontré, gracias...
Como podría hacer lo mismo pero para indicar que ejecute una macro hasta encontrar un valor vacío?
Hola buen dia es mi primer día. Al tener que usar depuración paso a paso en la parte de
do while not IsEmpty(ActiveCell) me arroja el error 1004
Gracias ya lo pide corregir
Disculpa cómo lo pudiste corregir?
hola primero quiero darte las gracias este video, tengo una duda tengo un listado aproximadamente de mil nombre use esta macro pero al ejecutarla mi equipo se pone lento y se demora alrededor de 5 minutos para terminar, esto es normal? existe una forma de que esto no pase? agradezco de antemano tu ayuda
Ejecute exactamente lo explicado en el tutorial, solo que yo quiero que el único elemento de todos los repetidos que quedo sin borrar, se le ponga en una celda al lado el valor de la variable "valor" la cual contendría cuantas veces estuvo repetido... estoy tratando y no se como hacerlo
La macros funciona en la medida qué hay un valor repetido cuando se encuentra con un valor que no está repetido deja de funcionar
Hola Sergio saludos desde Caracas me encantan tus videos, tu contenido es super original. Quisiera que me ayudaras ajustar este código de macro, porque en efecto me funciona para eliminar pos duplicados de mi base de datos pero, en el caso de existir duplicados el valor único que quiero mantener es aquel registrado de forma más reciente. Como puedo agregar esa condición en la macro? Es decir quiero que la macro elimina el registro más antiguo
Llegaste a encontrar respuesta?
@@juniorsusanibar1147 si conseguí ajustarlo. Gracias
@@francisrojas123 Que le añadiste, por que tambien estoy en lo mismo :(
Ok....👍
Y si quisiera eliminar pero con la condición que si es de la misma fecha el registro duplicado me lo elimine?
Hola buenas,
Me sale error de sintaxis con el mensaje de compilación se esperaba separador de listas o) en la siguiente línea ¿Cómo lo puedo corregir?
Valor = Application.WorksheetFunction.CountIf(Range("A:A"), ActiveCell.Value
Por favor ayuda, muchas gracias.
grande
No se puede descargar el archivo en la pagina.... :(
Tienes razón. Ya lo puedes descargar.
Hola, Tengo una matriz donde una frase me representa un código. Es decir, por ejemplo, la palabra “Calidad” me presenta el códigos 01 y la palabra “servicio” me representa el código 02. Necesito una fórmula que busque dentro de un texto esas palabras y el resultado de la celda me arroje el código o los códigos de las palabras que encuentre dentro del mismo texto. Es posible? Puedes dar un tutorial con esa fórmula???
Exponga un ejemplo como tiene sus datos y en donde quiere el resultado, saludos
BUENAS NECESITO TU AYUDA, NO SE NADA DE EXCEL PERO TENGO UNA CADENA DE 20 DIGITOS Y NECESITO SEPARARLAS EN 10 DE 2 DIGITOS , COMO LE PUEDO HACER -?
Lo puede hacer con una formula =EXTRAE(A1,1,2) suponiendo que la cadena de caracteres esta en la celda A1 en la formula, el dato A1 representa en la celda donde esta la cadena de caracteres, el 1 es la posicion donde empieza a separar, el 2 es el numero de caracteres que va a separar. Para el siguiente unicamente cambia el numero 1 por el 3 ya que la separacion sera a partir del 3er caracter. Saludos