Macro sencilla

digamos que esta sea la formula





Sub Macro1()


ActiveCell.FormulaR1C1 = _
"=((RC[-1]-RC[-2])"

End Sub



si me situo en la celda que quiero que haga el calculo, y ejecuto la macro,
me resuelve el calculo y me indica en la celda el resultado de la operacion,
pero tambien, me indica todo el calculo, es decir, me sale que he restado 2
celdas y me las muestra.

Lo que quiero es que esta formula se encuentre dentro de una variable - nose
si esta bien llamarlo asi- pero quiero que digamos yo solo ponga en la celda
donde quiero el resultado la palabra y que automaticamente me salga el
calculo, es posible hacer esto??

digamos que en la celda A10 es donde quiero aplicar la formula, tonces en
esta celda escribere

=resultado

y cuando presione enter, me salga el resultado de la operacion, y que solo
muestre en la pantalla =resultado.


gracias




"Johann Romero" escribió en el mensaje
news:u$

Un favor:

Ees pongo un ejemplo sencillo para despues yo aplicarlo a mi caso.

Digamos que:

A B C D E F

1 2 4 6 8 AQUI VA LA MACRO
2 6 7 5 3
3 1 0.5 7 2
4


digamos que en la macro quiero q sea en la celda E1, pero que se repita
hacia abajo, es decir, E2, E3,

y que la macro haga lo siguiente


(A*B + C)/2 + D

tonces digamos que tendria que darme en la columna E1 E2 E3 los siguientes
datos


E1 = 15
E2 = 26.5
E3 = 5.75

obvio que en la celdas tendria que poner algo asi como: =formula(e1)


el problema esta en que, cuando hago la macro me toma siempre los valos
del rango que selecciono, osea, los valores de la FILA1, como puedo hacer
que me tome los valores de cada fila.

si es posible me pueden hacer toda la macro,

gracias.


gracias.

(Creo que) realmente no necesitas ninguna macro para lo que pides.

Escribe en E1: =(A1*B1+C1)/2+D1 y Copia/Pega hacia abajo hasta donde necesites.

Saludos: Antonio.
**************************
"Johann Romero" escribió en el mensaje news:u$

Un favor:

Ees pongo un ejemplo sencillo para despues yo aplicarlo a mi caso.

Digamos que:

A B C D E F

1 2 4 6 8 AQUI VA LA MACRO
2 6 7 5 3
3 1 0.5 7 2
4


digamos que en la macro quiero q sea en la celda E1, pero que se repita hacia abajo, es decir, E2, E3,

y que la macro haga lo siguiente


(A*B + C)/2 + D

tonces digamos que tendria que darme en la columna E1 E2 E3 los siguientes datos


E1 = 15
E2 = 26.5
E3 = 5.75

obvio que en la celdas tendria que poner algo asi como: =formula(e1)


el problema esta en que, cuando hago la macro me toma siempre los valos del rango que selecciono, osea, los valores de
la FILA1, como puedo hacer que me tome los valores de cada fila.

si es posible me pueden hacer toda la macro,

gracias.


gracias.

Si realmente lo quieres con una macro:

Sub Prueba()
Dim celda As Range
For Each celda In Range("E1:E3")
celda.FormulaR1C1 = "=(RC[-4]*RC[-3]+RC[-2])/2+RC[-1]"
Next celda
End Sub

Saludos.