¿Cómo numerar filas después de insertar o eliminar filas automáticamente en Excel?
Supongamos que tengo filas numeradas del 1 al 20 en una columna, ahora, cuando inserto o elimino una fila del rango de datos, quiero que la lista de números se pueda volver a numerar automáticamente. ¿Esta tarea se puede completar en Excel?
Numere las filas después de insertar o eliminar filas automáticamente con fórmulas
Numere las filas después de insertar o eliminar filas automáticamente con el código VBA
Numere las filas después de insertar o eliminar filas automáticamente con fórmulas
De hecho, la función Fila en Excel puede ayudarlo a renumerar automáticamente las filas después de insertar o eliminar filas, haga lo siguiente:
1. Ingrese esta fórmula: = FILA () - 1 en la celda A2, y luego arrastre el controlador de relleno hacia las celdas en las que desea numerar las filas, vea la captura de pantalla:
Note: Si su lista de números comienza en la primera celda, puede cambiar la fórmula como = FILA (), puede sumar o restar de la fórmula si sus números no coinciden con la fila real, por ejemplo, = FILA () - 3, = FILA () + 10...
2. Luego cree una tabla para este rango de datos, seleccione el rango de datos y haga clic en recuadro > Mesa, y luego en el Crear mesa cuadro de diálogo, comprobar Mi mesa tiene encabezados si hay encabezados en su rango, vea la captura de pantalla:
3. Y luego haz clic OK, la tabla se ha creado a la vez, y ahora, cuando inserta o elimina filas en el rango de la tabla, los números de fila siempre se actualizan automáticamente, vea la captura de pantalla:
Numere las filas después de insertar o eliminar filas automáticamente con el código VBA
Excepto el método de fórmula anterior, también puede terminarlo con un código VBA.
1. Vaya a la hoja de trabajo en la que desea insertar números de secuencia automáticamente.
2. Haga clic con el botón derecho en la pestaña de la hoja y seleccione Ver código en el menú contextual, en el emergente Microsoft Visual Basic para aplicaciones ventana, copie y pegue el siguiente código en la ventana del módulo en blanco.
Código de VBA: filas numéricas automáticas después de insertar o eliminar filas:
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160612
Dim I As Integer
I = 1
Application.EnableEvents = False
For I = 1 To 20
Range("A" & I).Value = I
Next
Range("A21").Value = ""
Application.EnableEvents = True
End Sub
3. Luego guarde y cierre este código, cuando ingrese el primer número 1 en la celda A1, los números de secuencia del 1 al 20 se completarán automáticamente. Si inserta o elimina filas del rango, el número de serie se volverá a numerar automáticamente de una vez.
Note: En el código anterior, la letra A indica la letra de la columna en la que desea completar el número de secuencia, 1 Para 20 son las filas que desea numerar, y A21 es la referencia de celda junto a la última celda numerada. Puede cambiarlos cuando lo necesite.
Insertar viñetas o lista de numeración en una columna de celdas
Kutools for Excel's Insertar viñeta y yonsert Numeración Las funciones pueden ayudarlo a insertar rápidamente listas de numeración y viñetas en una columna de celdas. ¡Haga clic para descargar Kutools para Excel!
Kutools for Excel: con más de 300 prácticos complementos de Excel, prueba gratuita y sin límite en 30 días. ¡Descarga y prueba gratis ahora!
Demostración: Numere las filas después de insertar o eliminar filas automáticamente en la hoja de cálculo de 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!