Números seriales o secuenciales en Excel (macro)

26 Ago Números seriales o secuenciales en Excel (macro)

Números seriales o secuenciales en Excel

¿Cómo podemos generar una lista de números seriales o secuenciales, comenzando desde el 1 y hasta un valor definido por columna, con una macro en Excel?

La siguiente macro nos permite generar rápidamente una serie numérica por columna comenzando desde el valor 1. Para utilizarla de forma exitosa debemos primero posicionarnos en la celda donde queremos comenzar el primer valor de serie (1), y luego al ejecutarla nos aparecerá una ventana donde debemos configurar el último valor para dicha serie. Podemos asignarla a la ejecución de un botón o comando para de esta forma ejecutarla mucho más rápido, o bien desde la opción Macros del menú “Programador”. Debemos copiar la siguiente instrucción dentro de un nuevo módulo en la ventana de Visual Basic:

NÚMEROS SERIALES O SECUENCIALES EN EXCEL

Sub AñadirSeries()
Dim i As Integer
On Error GoTo Last
i = InputBox("Ingresar último valor", "Números seriales")
For i = 1 To i
ActiveCell.Value = i
ActiveCell.Offset(1, 0).Activate
Next i
Last: Exit Sub
End Sub

Como podemos ver nombramos a la función “AñadirSeries”. Si buscamos desde la opción Macros del menú “programador”, podremos encontrarla con dicho nombre para poder ser ejecutada. Esta macro es muy útil para aquellos casos donde disponemos de muchas celdas por columna y necesitamos rápidamente generar una lista secuencial de números hasta la última celda requerida.

De esta forma podemos obtener de forma rápida y fácil, una lista secuencial de números desde el 1 hasta el último valor que necesitemos por columna de datos.

Te recomiendo ver el siguiente link con más videos de Macros útiles de Excel AQUÍ.

¿No sabés como instalar esta macro? ¡No te preocupes!  Aquí está la solución:

Salvo aclaración, todas las fórmulas y macros de este sitio están configuradas para aplicarse sobre la celda A1. Algunas fórmulas se encuentran encerradas entre llaves {} debido a que son fórmulas matriciales. Estas llaves no deben introducirse tecleándolas, sino que se generan automáticamente al aceptar la fórmula pulsando Control+Shift+Enter al mismo tiempo. Las fórmulas de este sitio son compatibles con versiones de Microsoft Excel® 2010 o superiores.