Pasar valor en un a formula

[varela_b]

Hola a todos.
Espero me puedan ayudar con esto.

Sub convierte()
Sheets("Hoja1").Select
Range("B20").Select '154C
mLargo = Len(ActiveCell.Value)
ActiveCell.Offset(1, 0).Value = mLargo
For i = 1...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[DIEGO VALENCIA NEIRA]

Que tal esto:

Sub convierte()
Hoja1.Activate
Range("B20").Select '154C
mLargo = Len(ActiveCell.Value)
ActiveCell.Offset(1, 0).Value = mLargo
For i = 1 To mLargo
'Necesito que el valor de i...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[varela_b]

Hola Diego.
Eso es, sencillito.
Muchas Gracias.