ejecutar texto como formula

Hola Fredy

Usa AVERAGE

Saludos, César.



"fredy" wrote:

hola grupo!
tengo la siguiente macro:

Sub pruebatexto()
Formula1 = "PROMEDIO(A1:B1)"
Cells(8, 4) = "=" & Formula1
'Cells(8, 4)
End Sub

la macro si coloca la formula pero sale error #¿NOMBRE? al pararme en la
celda donde coloque la formula dar F2 y enter la formula funciona bien..
que tengo que hacer para que no salga el error #¿NOMBRE?

se puede?
muchas gracias

hola

para que la formula funcione debes emplear lo siguiente

cells(8,4).formula="=average(A1:B1)"

en esta debes emplear el nombre de la funcion en ingles, que es como se
entiende excel, luego ya lo traduce el solito al idioma en que esta
instalado.

cells(8,4).formulalocal="=promedio(A1:B1)"

si empleas esta otra las formulas seran las que emplea la aplicacion
instalada pero dara problemas si lo llevas a otro excel con un idioma
diferente

tambien puedes emplear el resto de las expresiones como formulaR1C1,
formulaR1C1loaca (revisa la ayuda de cada una)

Para la traduccion de las formulas estos dos enlaces tienen una utilidad y
un archivo para el idioma de las formulas

http://members.chello.nl/keepitcool/download.html
http://cherbe.free.fr/traduc_fonctions_xl97.html

un saludo
juan

Juan M y Cesar muchas gracias por la atencion a mi duda...
lo que pasa es que las formulas para las cuales debo realizar esta
metodologia son mas complicadas ( o por lo menos muy largas ) entonces la
traduccion no es facil... miren tengo formulas como esta:

=SI($A66<119;SI(E66>=1;T66*F66;0)-(SI(E66>=2;D65*(F66-F65);0)+SI(E66>=3;D64*(F65-F64);0)+SI(E66>=4;D63*(F64-F63);0)+SI(E66>=5;D62*(F63-F62);0)+SI(E66>=6;D61*(F62-F61);0)+SI(E66>=7;D60*(F61-F60);0));0)
y asi son muchas...

por eso quiero saber si es posible guardar las formulas en texto y luego
ejecutarlas
"Juan M" wrote:

hola

para que la formula funcione debes emplear lo siguiente

cells(8,4).formula="=average(A1:B1)"

en esta debes emplear el nombre de la funcion en ingles, que es como se
entiende excel, luego ya lo traduce el solito al idioma en que esta
instalado.

cells(8,4).formulalocal="=promedio(A1:B1)"

si empleas esta otra las formulas seran las que emplea la aplicacion
instalada pero dara problemas si lo llevas a otro excel con un idioma
diferente

tambien puedes emplear el resto de las expresiones como formulaR1C1,
formulaR1C1loaca (revisa la ayuda de cada una)

Para la traduccion de las formulas estos dos enlaces tienen una utilidad y
un archivo para el idioma de las formulas

http://members.chello.nl/keepitcool/download.html
http://cherbe.free.fr/traduc_fonctions_xl97.html

un saludo
juan

hola

si puedes emplearlo con cadenas de texto, incluso partir la formula para
introducir el rango por codigo

Sub prueba()
Dim strf As String

strf = "sum(A1:A10)"

Range("C8").Formula = "=" & strf & "+" & strf

End Sub

La primera direccion no funciona, revisa la siguiente
http://www.rondebruin.com/atptranslator.htm

y estas otras
http://www.microsoft.com/technet/pr...mtran.mspx
http://www.microsoft.com/office/ork...m#cmdtrans

un saludo
juan


"fredy" escribió en el mensaje
news:

Juan M y Cesar muchas gracias por la atencion a mi duda...
lo que pasa es que las formulas para las cuales debo realizar esta
metodologia son mas complicadas ( o por lo menos muy largas ) entonces la
traduccion no es facil... miren tengo formulas como esta:

=SI($A66<119;SI(E66>=1;T66*F66;0)-(SI(E66>=2;D65*(F66-F65);0)+SI(E66>=3;D64*(F65-F64);0)+SI(E66>=4;D63*(F64-F63);0)+SI(E66>=5;D62*(F63-F62);0)+SI(E66>=6;D61*(F62-F61);0)+SI(E66>=7;D60*(F61-F60);0));0)
y asi son muchas...

por eso quiero saber si es posible guardar las formulas en texto y luego
ejecutarlas
"Juan M" wrote:

hola

para que la formula funcione debes emplear lo siguiente

cells(8,4).formula="=average(A1:B1)"

en esta debes emplear el nombre de la funcion en ingles, que es como se
entiende excel, luego ya lo traduce el solito al idioma en que esta
instalado.

cells(8,4).formulalocal="=promedio(A1:B1)"

si empleas esta otra las formulas seran las que emplea la aplicacion
instalada pero dara problemas si lo llevas a otro excel con un idioma
diferente

tambien puedes emplear el resto de las expresiones como formulaR1C1,
formulaR1C1loaca (revisa la ayuda de cada una)

Para la traduccion de las formulas estos dos enlaces tienen una utilidad
y
un archivo para el idioma de las formulas

http://members.chello.nl/keepitcool/download.html
http://cherbe.free.fr/traduc_fonctions_xl97.html

un saludo
juan