Macro para automatizar solver [error en mi bucle]

2 envíos / 0 nuevos
Último envío
Laurismo
Imagen de Laurismo
Offline
última acción: Hace 5 años 3 semanas
alta: 28/03/2019 - 08:49
Puntos: 25
Macro para automatizar solver [error en mi bucle]

Hola, soy nueva en esto de las macros, y ahora mismo necesito una macro que me permita automatizar solver, para resolver linea a linea la misma ecuación en una tabla.

PROBLEMA 1: Lo primero que hice fue grabar una macro resolviendo la primera línea utilizando el solver manualmente, pero a la hora de introducir el bucle este no funciona. Cuando ejecuto la macro solo me resuelve la primera línea y el resto se quedan como están (esto me da a entender que he escrito mal el código que hace que el bucle funcione).

PROBLEMA 2: Cuando se utiliza solver, al final aparece una ventana que te dice lo de si aceptas la solución de solver y demás, yo no quiero que esto salga todas las veces, pero eso incluí un trozo de código para que no aparezca, pero tampoco funciona.

Aquí muestro mi código:

Sub SolverMacro()

'Variable i para el bucle

Dim i As Integer

'Bucle

For i = 2 To 5

' SolverMacro Macro

'Reset

    SolverReset

    SolverOk SetCell:="$N$2", MaxMinVal:=3, ValueOf:=44, ByChange:="$M$2", Engine:= _

        1, EngineDesc:="GRG Nonlinear"

    SolverOk SetCell:="$N$2", MaxMinVal:=3, ValueOf:=44, ByChange:="$M$2", Engine:= _

        1, EngineDesc:="GRG Nonlinear"

    SolverSolve

  'Para que no salga lo del Solver todas las veces

    SolverSolve userFinish:=True

    SolverFinish KeepFinal:=1

Next i

    

End Sub


Gracias de antemano!

 

 

Etiquetas: 

Cron
Imagen de Cron
Offline
última acción: Hace 8 meses 3 semanas
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntos
alta: 23/06/2010 - 12:30
Puntos: 12735
Lo que estás haciendo es

Lo que estás haciendo es resolver 4 veces la misma línea.

Cuando haces un bucle así te puedes apoyar en la i para ir variando, por ejemplo, a qué celda haces referencia en cada ocasión.

Como no sé cómo tienes tus datos estructurados, no sé cómo hacer referencia al segundo y siguientes valores a resolver...

 

Un saludo