Solver

Hola Roger,

Para emplearlo dentro de una macro, la mejor respuesta sería que la grabaras
tu mismo con el escenario (rangos) que tienes en tu hoja.
Si tomamos como partida los rangos que te propuse para el ejemplo y
modificamos la fórmula inicial en F4 según la sugerencia de Héctor Miguel,
la macro quedaría algo así:

[F4]=(F6+F8)-F6*COSH(F7/F6)

Sub test
Range("F4").GoalSeek Goal:=0, ChangingCell:=Range("F6")
End Sub



Un saludo,
Juan

"Roger" escribió
> Gracias Hector Miguel, me ha quedado claro, creo que no habia analizado
> correctamente la ayuda que me dio Juan M., a quie le doy las gracias
> tambien.
> me gustaria saber, como puedo palnterlo como macro, para que se
> autoejecute,
> es posible.
> saludos.
> gracias.
> Roger.
>
>
> "Héctor Miguel" wrote:
>
>> hola, Roger !
>>
>> > ... el caso particular de mi problema... espero ser claro.
>> > valor por tanteos= c= 13.250
>> > valor fijo x= 14
>> > valor fijo f= 8
>> > 0
>> > valor calculado en formula= 21.3605
>> > fmax= 21.2500
>> > nesesito saber si solver me puede resolver que se igualen los valores
>> > del valor calculado con el fmax
>> > claro si voy variando el valor de c, se alcanzara el valor buscado...
>>
>> si solamente tienes una celda variable/ajustable/modificable/... y las
>> demas son fijas o formuladas -?-
>> no requieres de la herramienta del solver (aunque puedes utilizarla)
>> y pudiera ser mas rapido (como comenta Juan M) usar el comando "buscar
>> objetivo" del menu de herramientas
>>
>> solo necesitas una celda "puente" para "igualar" a cero la diferencia
>> entre "y" verus "fmax" (donde quiera que las pongas)
>> vamos a suponer que usas A1, y pones una formula +/- como la siguiente:
>> =y-fmax (o... =y-ymax segun tu primera consulta) -???-
>>
>> usando buscar objetivo:
>> 1) seleccionas A1 (o la celda que uses como "puente")
>> 2) (menu) herramientas / buscar objetivo...
>> 3) en el dialogo aparecera A1 en la referencia "definir celda:"
>> en la referencia para "con el valor:" estableces el valor de 0 (cero)
>> en la referencia "para cambiar la celda:" indicas la celda con la
>> variable "c"
>> -> y aceptas dos veces ;)
>>
>> usando la herramienta del solver...
>> 1) seleccionas A1 (o la celda que uses como "puente")
>> 2) (menu) herramientas / solver...
>> 3) en el dialogo aparecera A1 en la referencia "celda objetivo"
>> para "valores de la celda", selecciona "valores de:" y pones un 0
>> (cero)
>> para la referencia "cambiando las celdas" indicas la celda con la
>> variable "c"
>> -> pulsas resolver y luego pulsas en aceptar ;)
>>
>> saludos,
>> hector.
>>
>> __ la propuesta anterior __
>> >> Juan M escribio en el mensaje ...
>> >> que es f?.
>> >> Por ejemplo,
>> >> si en la celda F4, ponemos la formula ö*COSH(F7/F6)
>> >> en F6 esta el valor de c
>> >> en F7 el valor de x (el que vamos a ir variando)
>> >>
>> >> En F8 ponemos el valor de f
>> >> en F9 el valor de ymax ö+F8
>> >>
>> >> Ahora en el menu herramientas> Buscar objetivo...
>> >> en difinir la celda elegimos F4
>> >> con el valor: pondriamos el resultado de F9 (valor)
>> >> Para cambiar la celda: seleccionamos F7
>>
>> __ la consulta original __
>> >>> Roger escribio en el mensaje ...
>> >>> ... como usar el comando solver para calcular aproximaciones
>> >>> para obtener el resultado de la ecuacion y=c cosh(x/c)
>> >>> normalmente doy un valor a c para determinarlo por tanteos hasta
>> >>> igualar el resultado
>> >>> ejemplo cuando c, y=c cosh(x/c), ymax=f+c, sabiendo que f es un
>> >>> valor conocido.
>>
>>
>>