¿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 Sub3. 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.
Nota:: 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 En Oferta 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
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
3. A continuación, aparece un cuadro de diálogo para indicarle cuántas filas se han eliminado, haga clic en el OK
Si desea tener una prueba gratuita (30-día) 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
Kutools para Excel resuelve la mayoría de sus problemas y aumenta su productividad en un 80%
- Reutilizar: Inserte rápidamente fórmulas complejas, gráficos y cualquier cosa que hayas usado antes; Cifrar celdas con contraseña; Crear lista de distribución y enviar correos electrónicos ...
- Barra de súper fórmula (edite fácilmente varias líneas de texto y fórmulas); Diseño de lectura (leer y editar fácilmente un gran número de celdas); Pegar en rango filtrado...
- Combinar celdas / filas / columnas sin perder datos; Contenido de celdas divididas; Combinar filas / columnas duplicadas... Prevenir celdas duplicadas; Comparar rangos...
- Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
- Copia exacta Varias celdas sin cambiar la referencia de la fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, Casillas de verificación y más ...
- Extraer texto, Agregar texto, Eliminar por posición, Quitar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
- Súper filtro (guardar y aplicar esquemas de filtros a otras hojas); Orden avanzado por mes / semana / día, frecuencia y más; Filtro especial en negrita, cursiva ...
- Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes de xls, xlsx y PDF...
- Más de 300 potentes funciones. Compatible con Office/Excel 2007-2021 y 365. Compatible con todos los idiomas. Fácil implementación en su empresa u organización. Funciones completas Prueba gratuita de 30 días. Garantía de devolución de dinero de 60 días.
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!
