Active.Cell

Hola Jose,

Cuatro cosas:

1) si usas las comillas dentro de una cadena de texto, debes usar las dos
veces
2) el uso de la primera instruccion en tu codigo es redundante
3) la formula que intentas usar no es R1C1, por lo cual debes usar la
propiedad Formula y no FormulaR1C1
4) creo que desde VBA, si usas la propiedad .Formula, deberias usar las
funciones en ingles, de lo contrario tendrias que usar la propiedad
.FormulaLocal.

por lo tanto prueba el siguiente codigo:

Cells(NumFila, 8).Formula = "=IF(TEXT(C9,""mmmm""))"

Saludos,
KL

"Jose A. Castrejon" wrote in
message news:

Buanas Tardes, estoy poniendo en una parte de un macro lo siguiente

ActiveCell = Cells(NumFila, 8).Select
ActiveCell.FormulaR1C1 = "=SI(TEXTO(C9,"mmmm"))"

pero cuando termino de escribir la ultima comilla me sale un mensaje que
dice :

"Error de compilacion se esperaba fin de la instruccion "
Lo que quiero es poner en la celda seleccionada esta formula, para no
tenrla
en la hoja y que este ocupando espacio inecesario si no hay datos.

Porque ?
Gracias

Tu primera instruccion no tiene mucho sentido porque ActiveCell no puede
asignarse, te deberia dar error, pero seguramente usa la propiedad por
defecto. Te recomendaria que quitaras la asignacion, coloca solo:

Cells(NumFila, 8).Select

"José A. Castrejón" escribió en el
mensaje news:

Buanas Tardes, estoy poniendo en una parte de un macro lo siguiente

ActiveCell = Cells(NumFila, 8).Select
ActiveCell.FormulaR1C1 = "=SI(TEXTO(C9,"mmmm"))"

pero cuando termino de escribir la ultima comilla me sale un mensaje que
dice :

"Error de compilacion se esperaba fin de la instruccion "
Lo que quiero es poner en la celda seleccionada esta formula, para no
tenrla
en la hoja y que este ocupando espacio inecesario si no hay datos.

Porque ?
Gracias