Actividad pública reciente
Ha valorado "Excelente" la respuesta
Fórmula para seriar en orden consecutivo.
Eso se puede hacer directo con el mouse... Pero si te gustan las macros, esta te puede servir Sub seriar() Range("a1").Select Selection.AutoFill Destination:=Range("a1:a30"), Type:=xlFillSeries Range("a1").Select End Sub Llena el rango a1:a30...