Tabla de contenido
Una de las actividades más importantes en Excel es eliminar duplicados Hoy voy a mostrar cómo eliminar duplicados en Excel utilizando sólo VBA.
Descargar el cuaderno de prácticas
Eliminar duplicados en Excel con VBA.xlsm3 métodos rápidos para utilizar VBA en Excel para eliminar duplicados
Aquí tenemos un conjunto de datos con el valor Nombres, identificaciones, Marcas, y Grados en el examen de unos alumnos de una escuela llamada Sunflower Kindergarten.
Si se fija bien, verá que algunos nombres se han repetido por error.
Hoy nuestro objetivo es eliminar los valores duplicados utilizando Excel VBA.
1. Utilizar VBA para eliminar duplicados de un rango de celdas fijo
En primer lugar, intentaremos eliminar los nombres duplicados utilizando un rango de celdas fijo en el VBA código.
Aquí, nuestro conjunto de datos es el rango B3:E15 en el libro de trabajo (incluido el Encabezados de columna ).
Utilizaremos este rango de celdas fijo en el código.
Primer paso:
➤ Abrir un nuevo VBA e inserte un nuevo módulo (Haga clic aquí para ver cómo abrir e insertar un nuevo módulo VBA en Excel).
➤ Inserta este código en el módulo:
Código:
Sub Remove_Duplicates() Range("A3:E14").RemoveDuplicates Columns:=1, Header:=xlYes End Sub ➤ Produce una macro llamada Eliminar_duplicados . A3:E14 es el rango de mi conjunto de datos, y quiero eliminar las filas duplicadas basado en Columna 1 Usa el tuyo.
Segundo paso:
➤ Vuelve a tu hoja de cálculo y ejecuta esta Macro (Pulsa aquí para ver cómo ejecutar la Macro).
➤ Eliminará las filas con duplicados en la columna 1 ( Nombre del alumno).
Más información: Cómo eliminar duplicados en Excel pero conservar uno (7 métodos)
2. Insertar Códigos VBA para Eliminar Duplicados del Rango de Celdas Seleccionado
Ahora intentaremos construir una macro que pueda eliminar duplicados de cualquier rango de celdas seleccionado en la hoja de cálculo.
Paso 1:
➤ Abrir un nuevo VBA e inserte otro módulo nuevo.
➤ Inserta este código en el módulo:
Código:
Sub Remove_Duplicates() Dim Rng As Range Set Rng = Selection Rng.RemoveDuplicates Columns:=1, Header:=xlYes End Sub ➤ Produce una macro llamada Eliminar_duplicados Quiero eliminar las filas duplicadas basándome en Columna 1 Usa el tuyo.
Segundo paso:
➤ Vuelve a tu hoja de trabajo.
➤ Seleccione su conjunto de datos y ejecute esta macro.
➤ Ejecutará lo mismo que hizo anteriormente. Elimina las filas con duplicados en la columna 1 ( Nombre del alumno).
Más información: Cómo eliminar filas duplicadas en Excel (3 maneras)
Lecturas similares
- Cómo eliminar duplicados de columna en Excel (3 métodos)
- Excel VBA: Eliminar Duplicados de una Matriz (2 Ejemplos)
- Cómo eliminar duplicados y conservar el primer valor en Excel (5 métodos)
- Eliminar Filas Duplicadas Excepto la 1ª Ocurrencia en Excel (7 Formas)
- Cómo eliminar ambos duplicados en Excel (5 maneras fáciles)
3. Insertar una macro VBA para eliminar duplicados de varias columnas
Hasta ahora hemos eliminado las filas que tienen duplicados en la columna 1 ( Nombre del alumno ).
Pero, de hecho, los nombres de dos alumnos pueden ser iguales, no siempre significa que se haya añadido erróneamente si dos nombres son iguales.
Pero si los ID de dos alumnos también son iguales, entonces son el mismo alumno. Entonces hay que eliminar la fila.
Esta vez desarrollaremos una Macro que eliminará la fila si tanto el nombre como el ID de dos filas son iguales.
Primer paso:
➤ Abrir un nuevo VBA e inserte otro módulo nuevo.
➤ Inserta este código en el módulo:
Código:
Sub Remove_Duplicates() Dim Rng As Range Set Rng = Selection Rng.RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes End Sub ➤ Produce una macro llamada Eliminar_duplicados Quiero eliminar las filas duplicadas basándome en Columnas 1 y 2 (Nombre y DNI) Usa el tuyo.
Segundo paso:
➤ Vuelve a tu hoja de trabajo.
➤ Seleccione su conjunto de datos y ejecute esta macro.
➤ Esta vez eliminará las filas sólo si tanto el nombre como el ID del alumno son iguales.
Nota: En este caso no ha eliminado a Jennifer Marlo porque los DNI de las dos alumnas son diferentes, es decir, son dos alumnas distintas.
Más información: Excel VBA: Eliminar Duplicados Comparando Varias Columnas (3 Ejemplos)
Conclusión
Con estos métodos, puede eliminar duplicados de un conjunto de datos en Excel utilizando VBA. ¿Tiene algún problema? No dude en preguntarnos.
