¿Cómo filtrar una lista y eliminar el resto de filas ocultas o visibles en Excel?
Para una lista filtrada, es posible que deba eliminar las filas ocultas o visibles para conservar solo los datos útiles. En este artículo, le mostraremos métodos para eliminar el resto de filas ocultas o visibles de una lista filtrada en Excel.
Eliminar filas ocultas en la hoja de trabajo activa con código VBA
Eliminar filas visibles de la lista filtrada seleccionando todas las celdas visibles
Elimine fácilmente filas ocultas o visibles de la lista filtrada con Kutools para Excel
Eliminar filas ocultas en la hoja de trabajo activa con código VBA
Esta sección le mostrará el código VBA para eliminar filas ocultas en la hoja activa. Haz lo siguiente.
1. Active la hoja de trabajo que necesita para eliminar filas ocultas, presione otro + F11 teclas simultáneamente para abrir el Microsoft Visual Basic para aplicaciones ventana.
2. En la ventana de Microsoft Visual Basic para Aplicaciones, haga clic en recuadro > Módulo. Y luego copie y pegue el siguiente código VBA en la ventana del Módulo.
Código de VBA: eliminar filas ocultas
Sub RemoveHiddenRows()
Dim xRow As Range
Dim xRg As Range
Dim xRows As Range
On Error Resume Next
Set xRows = Intersect(ActiveSheet.Range("A:A").EntireRow, ActiveSheet.UsedRange)
If xRows Is Nothing Then Exit Sub
For Each xRow In xRows.Columns(1).Cells
If xRow.EntireRow.Hidden Then
If xRg Is Nothing Then
Set xRg = xRow
Else
Set xRg = Union(xRg, xRow)
End If
End If
Next
If Not xRg Is Nothing Then
MsgBox xRg.Count & " hidden rows have been deleted", , "Kutools for Excel"
xRg.EntireRow.Delete
Else
MsgBox "No hidden rows found", , "Kutools for Excel"
End If
End Sub
3. presione el F5 clave para ejecutar el código. Si hay filas ocultas en la hoja activa, después de ejecutar el código, aparecerá un cuadro de diálogo para indicarle cuántas filas ocultas se han eliminado. Haga clic en el OK para eliminar las filas ocultas. Ver captura de pantalla:
De lo contrario, obtendrá el siguiente cuadro de diálogo después de ejecutar el código.
Note: el código VBA anterior no solo puede eliminar filas ocultas de la lista filtrada, sino también eliminar filas ocultas que ha ocultado manualmente antes.
Eliminar filas visibles de la lista filtrada con la función de seleccionar todas las celdas visibles
Para eliminar filas visibles de la lista filtrada, haga lo siguiente.
1. Seleccione todas las filas filtradas y presione F5 clave para abrir el Para ir cuadro de diálogo, luego haga clic en el Especiales botón. Ver captura de pantalla:
2. En el Ir a Especial cuadro de diálogo, verifique Solo celdas visibles opción, y luego haga clic en la OK del botón.
3. Ahora todas las filas visibles están seleccionadas, haga clic con el botón derecho en la selección y luego haga clic en Eliminar filas.
Hasta ahora, todas las filas visibles se eliminan de la lista filtrada.
Elimine fácilmente filas ocultas o visibles de la lista filtrada con Kutools para Excel
Los dos métodos anteriores pueden no ser las soluciones deseadas para muchos usuarios de Excel, aquí le presentamos una herramienta útil. Con la Eliminar filas y columnas ocultas (visibles) utilidad de Kutools for Excel, puede eliminar fácilmente las filas ocultas en el rango / hojas seleccionados, la hoja activa o todas las hojas de trabajo en Excel.
Antes de aplicar Kutools for Excel, Por favor descargarlo e instalarlo en primer lugar.
1. Si solo desea eliminar filas ocultas o visibles de una lista filtrada, seleccione el rango filtrado manualmente y luego haga clic en Kutools > Borrar > Eliminar filas y columnas ocultas (visibles). Ver captura de pantalla:
2. En el Eliminar filas y columnas ocultas (visibles) cuadro de diálogo, mantenga el En rango seleccionado seleccionado en el Pase a ver lista desplegable (puede seleccionar otras opciones que necesite), marque el filas opción en el Eliminar tipo sección, y en la Tipo detallado sección, verificar Filas visibles or Filas ocultas opción que necesite. Y finalmente haga clic en el OK del botón.
3. A continuación, aparece un cuadro de diálogo para indicarle cuántas filas se han eliminado, haga clic en el OK del botón.
Si desea tener una prueba gratuita (30 días) de esta utilidad, haga clic para descargarloy luego vaya a aplicar la operación según los pasos anteriores.
Elimine filas ocultas o visibles de la lista filtrada con Kutools para Excel
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!