resultado de una macro

Ivan,

Podrias mostrar el codigo por favor - seria mucho mas facil identificar el
problema.

Saludos,
KL

"Ivan" wrote in message
news:

Hola a todos !!

Estoy llenando una formulas en celdas mediante una macro, la formula
trabaja
bien, esta bien, pero recien la coloca la macro me aparece la palabra
NOMBRE?
en la celda, posteriormente hago doble click en la celda y presiono la
tecla
Enter y ahora si se aplica la formula.
Que podria hacer para que la macro aplique la formula y obtener el
resultado en forma automatica ( esto es, sin tener que seleccionar la
celda,
hacer doblke click y luego presionar la tecla enter ) ??????????

Agradesco de antemanoi su ayuda, comentario o sugerencia
saludos

este es el codigo:
sa = "<>" & """" & """"
sb = """" & """"
For k = 1 To 10
form = "=SI(A" & k & sa & ", B" & k & " * " & "5" & ", C" & k & " * " & "
10 " & " )"
Worksheets("hoja1").Cells(k, 4).Value = form
Next k


el resultado es :
#¿NOMBRE?

despues de hacer doble clik en la celda y luego presionar enter, obtengo el
resultado esperado, el cual es el resultado de la formula

=SI(A8<>"", B8 * 5, C8 * 10 )

Agradesco de antemano cualquier sugerencia

Ivan,

Prueba sustituir las funciones por su version inglesa. Algo asi:

form = "=IF(A" & k & sa & ", B" & k & "*" & 5 & ", C" & k & "*" & 10 & ")"

Al parecer para introducir las formulas desde VBA tienes las siguientes
opciones:

Cells(k, 4).Value = FormulaEnIngles
Cells(k, 4).Formula = FormulaEnIngles
Cells(k, 4).FormulaR1C1 = FormulaR1C1EnIngles
Cells(k, 4).FormulaR1C1Local = FormulaR1C1Espanol
Cells(k, 4).FormulaLocal = FormulaEnEspanol

Las ultimas dos no se como se comportarian si se pretende correr el macro en
la version de Office en otro idioma, pero no me arriesgaria con ello.

Ademas de las mencionadas existe la posibilidad de introducir formulas
matriciales

Cells(k, 4).FormulaArray = ArrayFormulaR1C1

esta tiene q tener el formato R1C1 necesariamente. Desconozco si con ella se
pueden usar las funciones en el idioma local, pero es cuestion de
experimentar o ya nos lo dira el q use Excel en diferentes idiomas.

Saludos,
KL


"Ivan" wrote in message
news:

este es el codigo:
sa = "<>" & """" & """"
sb = """" & """"
For k = 1 To 10
form = "=SI(A" & k & sa & ", B" & k & " * " & "5" & ", C" & k & " * " & "
10 " & " )"
Worksheets("hoja1").Cells(k, 4).Value = form
Next k


el resultado es :
#?NOMBRE?

despues de hacer doble clik en la celda y luego presionar enter, obtengo
el
resultado esperado, el cual es el resultado de la formula

=SI(A8<>"", B8 * 5, C8 * 10 )

Agradesco de antemano cualquier sugerencia