Llenar celda con fórmula desde VBA

Feliz 2017 a toda la comunidad...

Quisiera que me ayuden con esta consulta de como poner esta fórmula en una columna especifica después de ejecutar una macro:

=SI([@[F_FIN]]="","ESTADO 1",SI(HOY()>[@[F_FIN]],"ESTADO 2","ESTADO 3"))

¿Seria posible con un bucle?

1 respuesta

Respuesta
1

Prueba con esto:

Sub formula()

Range("A1").FormulaLocal = "=SI([@[F_FIN]]="","ESTADO 1",SI(HOY()>[@[F_FIN]],"ESTADO 2","ESTADO 3"))"

Selection.AutoFill Destination:=Range("A1:A100")

End sub

Deberás cambiar la celda A1 y modificar el rango A1:A100 según te convenga

Gracias por el dato, pero al ejecutar me sale el mensaje de "Error de sintaxis" y la formula se marca en rojo, el otro detalle es que no se hace referencia a la hoja donde se va ejecutar la macro y lo que hace esto es llenar toda la columna pero quiero que se agregue cada vez que se va llenando una fila es por eso que mencione el bucle, gracias por el apoyo.

La fórmula que propones no la reconoce excel, por eso pone error de sintaxis. ¿Para qué sirve y que fin tiene?

Por otro lado lo del bucle no me queda claro, ¿cuándo este una fila entera hay que rellenar cierta columna? Pon un ejemplo grafico del resultado

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas