Fórmulas Compuestas VBA

Hola alguien me podría ayudar con esta fórmula compuesta
IF(E5000>26,CHAR((INT(E5000-1)/26)+64)&CHAR(MOD((E5000-1),26)+65),CHAR(E5000+64))"
la quiero ejecutar desde vb es decir
a = Application.WorksheetFunction.If(E5001 > 26, CHAR((Int(E5001 - 1) / 26) + 64) & CHAR(Floor((E5001 - 1), 26) + 65), CHAR(E5001 + 64))
Ya intente repitiendo Application.WorksheetFunction en cada fórmula pero no la he podido ejecutar ¿Cómo tengo que llamar a las demás funciones?
Les agradecería mucho.
Respuesta
1
No podrás con esa fsintaxis.
Utilizá una celda auxiliar (en mi ejemplo G5) donde colocarás la fórmula y luego pasás a la variable su resultado.
Range("G5").Formula = _
        "=+IF(E5000 >26,CHAR((INT(E5000-1)/26)+64)&CHAR(MOD((E5000-1),26)+65),CHAR(E5000+64))"
a = Range("G5").Value
Range("G5"). Clear

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas