Eliminar filas en Excel con condición

Por

Seguramente en algunos casos nos hemos visto en la necesidad de eliminar filas en Excel que contengan algún dato en especial, lo que puede ser un poco tedioso si son muchas filas las que hay que revisar.

La siguiente macro ayuda a eliminar filas que cumplan una condición. Por ejemplo, del siguiente listado se requieren eliminar todas las filas que contengan el texto “ave”.

eliminar-filas-excel-con-condicion

Eliminar las filas con una macro.

En la macro se deberán colocar los siguientes datos:

  • El nombre de la hoja que contiene la información
  • La columna donde se va a aplicar la condición
  • El texto de la condición. Todas las filas que tengas este texto serán eliminadas

Código de la macro:


Sub Eliminar_Filas()
Sheets("Hoja1").Select      'nombre de la hoja con la información
col = "A"                   'columna para aplicar la condición
'texto de la condición
'Para una fecha: "10/07/2017" el formato debe ser dd/mm/aaaa
'Para un número: "123"
texto = "ave"    '
valor = texto
If IsNumeric(texto) Then valor = Val(texto)
If IsDate(texto) Then valor = CDate(texto)    '
Application.ScreenUpdating = False
For i = Range(col & Rows.Count).End(xlUp).Row To 1 Step -1
If LCase(Cells(i, "A")) = LCase(valor) Then
Rows(i).Delete
End If
Next
Application.ScreenUpdating = True
MsgBox "Filas eliminadas", vbInformation, "DAM"
End Sub

El texto puede ser una palabra, un número, una fecha o todo un enunciado, si la celda contiene el dato exacto, será eliminada.

Sigue las Instrucciones para un botón y ejecutar la macro

  1. Abre tu libro de Excel
  2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
  3. En el menú elige Insertar / Módulo
  4. En el panel del lado derecho copia la macro
  5. Ahora para crear un botón, puedes hacer lo siguiente:
  6. Inserta una imagen en tu libro, elige del menú Insertar / Imagen / Autoformas
  7. Elige una imagen y con el Mouse, dentro de tu hoja, presiona clic y arrastra el Mouse para hacer grande la imagen.
  8. Una vez que insertaste la imagen en tu hoja, dale clic derecho dentro de la imagen y selecciona: Tamaño y Propiedades. En la ventana que se abre selecciona la pestaña: Propiedades. Desmarca la opción “Imprimir Objeto”. Presiona “Cerrar”
  9. Vuelve a presionar clic derecho dentro de la imagen y ahora selecciona: Asignar macro. Selecciona: Eliminar_Filas
  10. Aceptar.
  11. Para ejecutarla dale clic a la imagen.

Descargar archivo de Excel

Contenido relacionado:
Gerencie.com en su correo.

Suscríbase y nosotros colocaremos en su bandeja de entrada la mejor información que generamos diariamente.


Déjenos su opinión

7 Opiniones
  1. CARLOS ESCOBAR Dice:

    EXCELENTE INFORMACIÓN QUE A DIARIO COLOCAN QUE AYUDA A todos las personas en diferentes áreas mas en la contable "DIOS LOS BENDIGA"

    Responder
  2. Ramiro Lingan celis Dice:

    Muy buena la información que dios les bendiga

    Responder
  3. Itzá Dice:

    Gracias por facilitar la macro, sin duda ahorra bastante tiempo para cuando tenés celdas con valores repetidos. Porque a la antigua con buscar y luego eliminar celdas consume más tiempo. Saludos

    Responder
  4. DIEGO VILLADA CANTOR Dice:

    Muchisimas gracias por el código. Una pequeña corrección en la siguiente línea:

    If LCase(Cells(i, "A")) = LCase(valor) Then
    Rows(i).Delete

    Cambiar "A" por col , debido a que esta variable se define arriba como condición para la eliminación. Gracias de nuevo

    Responder
    • Dante Amor Dice:

      Gracias por el aporte!

      Responder
  5. Mariano Dice:

    Hola Dante cómo estás? Antes que nada gracias por el aporte.

    Estuve probando la macro y me funciona perfectamente, lo que necesitaría como condición es que me borre todas las filas con fecha mayor o menor a una fecha definida por el usuario.

    Yo en la fórmula defino el campo texto de la siguiente manera:

    texto = "30/09/2018" La macro me borra todas las fichas con fecha igual a la definida, pero necesito saber cómo indicar que tiene que ser mayor o menor a esa fecha.

    Muchísimas gracias de antemano.
    Saludos desde Argentina.
    Mariano

    Responder
  6. Miguel Dice:

    excelente caso, lo aplique para mis bases de datos y me funciono correctamente.

    Responder
En Gerencie.com está permitido opinar, criticar, discutir, controvertir, disentir, etc., pero debe hacerlo con respeto, sin insultar y sin ofender a otros.

Información legal aplicable para Colombia.

¿Preocupado por su pensión? Manténgase Informado.