Skip to main content

Kutools para Office — Una Suite. Cinco Herramientas. Haz Más.

¿Cómo numerar o renumerar automáticamente después de filtrar en Excel?

Author Xiaoyang Last modified

Como todos sabemos, después de filtrar los datos que tienen una lista de números de serie, los números de fila en la hoja de cálculo se mostrarán igual que los números originales; no se renumeran automáticamente. Sin embargo, a veces, es posible que desee renumerar las filas en secuencia en la hoja de cálculo filtrada, como se muestra en las siguientes capturas de pantalla. En este artículo, hablaré sobre cómo numerar o renumerar automáticamente después de filtrar en Excel.

Numeración automática o renumeración después de filtrar con código VBA

Numeración automática o renumeración después de filtrar con Kutools para Excel

originla numbers arrow right renumber after filtering

Numeración automática o renumeración después de filtrar con código VBA

En el estado filtrado, no puede aplicar el controlador de Autollenado para completar la secuencia de números; solo puede llenarlos escribiendo los números uno por uno. Pero esto será tedioso y llevará mucho tiempo si hay muchas celdas que necesitan ser renumeradas. Aquí, presentaré un código VBA para resolver esta tarea.

1. Mantenga presionadas las teclas ALT + F11, y se abrirá la ventana Microsoft Visual Basic para Aplicaciones.

2. Haga clic en Insertar > Módulo, y pegue la siguiente macro en la ventana del Módulo.

Código VBA: Numeración automática o renumeración después de filtrar

Sub Renumbering()
	'Updateby Extendoffice
	Dim Rng As Range
	Dim WorkRng As Range
	On Error Resume Next
	xTitleId = "KutoolsforExcel"
	Set WorkRng = Application.Selection
	Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
	Set WorkRng = WorkRng.Columns(1).SpecialCells(xlCellTypeVisible)
	xIndex = 1
	For Each Rng In WorkRng
		Rng.Value = xIndex
		xIndex = xIndex + 1
	Next
End Sub

3. Después de pegar el código, presione la tecla F5 para ejecutar este código, y aparecerá un cuadro de diálogo para recordarle que seleccione un rango de celdas donde desea numerar o renumerar automáticamente las filas, vea la siguiente captura de pantalla:

vba code to select the cells

4. Luego haga clic en Aceptar, y sus celdas seleccionadas se habrán renumerado secuencialmente como se muestra en la siguiente captura de pantalla:

the selected cells are renumbered sequentially

Nota: Este código destruirá los números de fila de la serie original cuando cancele la función de filtro. Por lo tanto, necesita hacer una copia de seguridad de sus datos primero.


Numeración automática o renumeración después de filtrar con Kutools para Excel

Si ha instalado Kutools para Excel, con su poderosa función Insertar número de secuencia, puede insertar números de secuencia en los datos filtrados rápidamente y fácilmente.

Kutools para Excel ofrece más de 300 funciones avanzadas para simplificar tareas complejas, potenciando la creatividad y la eficiencia. Integrado con capacidades de inteligencia artificial, Kutools automatiza las tareas con precisión, haciendo que la gestión de datos sea sencilla. Información detallada de Kutools para Excel...  Prueba gratuita...

Después de instalar Kutools para Excel, realice los siguientes pasos:

1. Seleccione las celdas que desea renumerar para los datos filtrados.

2. Luego haga clic en Kutools > Insertar > Insertar número de secuencia, vea la siguiente captura de pantalla:

 click Insert Sequence number feature of kutools

3. Luego, en el cuadro de diálogo Insertar número de secuencia que aparece, haga clic en el botón Nuevo, vea la siguiente captura de pantalla:

click New button in the dialog box

4. Y luego cree la lista de números de secuencia según sea necesario en la sección inferior izquierda, vea la siguiente captura de pantalla:

create the sequence list numbers in the dialog box

5. Después de configurar la secuencia, haga clic en el botón Agregar, y el elemento de secuencia se habrá agregado al cuadro de diálogo, vea la siguiente captura de pantalla:

the sequence item is added into the dialog box,

6. Luego haga clic en Rellenar rango, y los datos filtrados se habrán renumerado de inmediato. Ver captura de pantalla:

click Fill Range to renumber the cells

¡Descargue y pruebe gratis Kutools para Excel ahora!


Demostración: Numeración automática o renumeración después de filtrar con Kutools para Excel

 

Artículo relacionado:

¿Cómo numerar automáticamente celdas combinadas en Excel?

Las mejores herramientas de productividad para Office

🤖 Kutools AI Aide: Revoluciona el análisis de datos basado en: Ejecución inteligente | Generar código | Crear fórmulas personalizadas | Analizar datos y generar gráficos | Invocar Funciones mejoradas
Funciones populares: Buscar, resaltar o identificar duplicados | Eliminar filas en blanco | Combinar columnas o celdas sin perder datos | Redondear...
Super BUSCARV: Búsqueda por varios criterios | Búsqueda por varios valores | Búsqueda en varias hojas | Coincidencia difusa....
Lista desplegable avanzada: Cree rápidamente una lista desplegable | Lista desplegable dependiente | Lista desplegable de selección múltiple....
Administrador de columnas: Agregar un número específico de columnas | Mover columnas | Alternar el estado de visibilidad de columnas ocultas | Comparar rangos y columnas...
Funciones destacadas: Cuadrícula de enfoque | Vista de diseño | Barra de fórmulas mejorada | Administrador de Libro de trabajo y Hoja de cálculo | Biblioteca de AutoTexto | Selector de fechas | Combinar Datos | Cifrar/Descifrar celdas | Enviar correo electrónico por lista | Super Filtro | Filtro especial (filtrar celdas con fuente en negrita/cursiva/tachado...)...
Los15 principales conjuntos de herramientas:12 herramientas de texto (Agregar texto, Eliminar caracteres específicos, ...) | Más de50 tipos de gráficos (Diagrama de Gantt, ...) | Más de40 fórmulas prácticas (Calcular edad basada en la fecha de nacimiento, ...) |19 herramientas de inserción (Insertar código QR, Insertar imagen desde ruta, ...) |12 herramientas de conversión (Convertir a palabras, Conversión de moneda, ...) |7 herramientas de combinar y dividir (Combinar filas avanzado, Dividir celdas, ...) ... y más
Utiliza Kutools en tu idioma preferido: admite inglés, español, alemán, francés, chino y más de40 idiomas adicionales.

Mejora tu dominio de Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...


Office Tab incorpora la interfaz de pestañas en Office y facilita mucho tu trabajo

  • Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de hacerlo en ventanas separadas.
  • ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!

Todos los complementos de Kutools. Un solo instalador

El paquete Kutools for Office agrupa complementos para Excel, Word, Outlook y PowerPoint junto con Office Tab Pro, ideal para equipos que trabajan en varias aplicaciones de Office.

Excel Word Outlook Tabs PowerPoint
  • Suite todo en uno: complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
  • Un solo instalador, una licencia: configuración en minutos (compatible con MSI)
  • Mejor juntos: productividad optimizada en todas las aplicaciones de Office
  • Prueba completa de30 días: sin registro ni tarjeta de crédito
  • La mejor relación calidad-precio: ahorra en comparación con la compra individual de complementos