Active.Cell

17/06/2005 - 22:13 por José A. Castrejón | Informe spam
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
 

Leer las respuestas

#1 KL
17/06/2005 - 23:17 | Informe spam
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

Preguntas similares