Numerar consecutivamente con una macro

Hola. Y gracias por tu tiempo.

El planteamiento es el siguiente.

Si tengo en la celda A1 este número de orden "JO12-0001", al ejecutar la macro tiene que poner en la celda A2 el siguiente, es decir, "JO12-0002". Si la vuelvo a ejecutar tiene que poner en la celda A3 "JO12-0003", y así sucesivamente.

Gracias por adelantado y un saludo.

1 respuesta

Respuesta
1

Te mando mi solución:

-Escribe ese dato en la celda A1

-Después ejecuta esta macro y todo resuelto (puedes seguir ejecutándola sucesivamente)

Sub ejemplo()
Range("a65000").End(xlUp).Select
Selection.AutoFill Destination:=Range(ActiveCell, ActiveCell.Offset(1, 0))
End Sub

no olvides finalizar la consulta

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas