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!
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