Macro serie con limitante
Hola ... Necesito una macro que me permita hacer una serie de 6000 en 6000 iniciando con un numero por ejemplo 2305325 y el de abajo seria más 6000 pero quiero que lo haga tantas veces como le indique en otra celda por ejemplo si pongo en B:2 25 que solo haga la serie 25 veces ... Epero sea claro ... Muchas Gracias por su Valiosa Ayuda
1 Respuesta
Respuesta de tavopz
1
Puedes usar una macro como esta:
Sub series()
i = Val(InputBox("Valor inicial"))
j = Val(InputBox("Numero de repeticiones"))
k = Val(InputBox("Valor de incremento"))
For x = 1 To j
y = i + k
Range("A" & LTrim(Str(x))).Value = y
i = y
Next x
End Sub
Como verás en la macro se introducen todos los valores.
Sub series()
i = Val(InputBox("Valor inicial"))
j = Val(InputBox("Numero de repeticiones"))
k = Val(InputBox("Valor de incremento"))
For x = 1 To j
y = i + k
Range("A" & LTrim(Str(x))).Value = y
i = y
Next x
End Sub
Como verás en la macro se introducen todos los valores.
Muchas Gracias Tavo
Esta excelente eso es lo que en realidad quería
No sabes lo útil que me sera este macro
Felicidades Experto.
Esta excelente eso es lo que en realidad quería
No sabes lo útil que me sera este macro
Felicidades Experto.
