Hi all,
I am working on a model that after inputting multiple variables, I have to run solver on 1 field to equal zero then run solver on another field to equal zero and repeat this process until they are both zero.
Since they affect each other this can take multiple runs.
I have recorded a macro that is tied to a button so I just have to click back and fourth, but I would like to create a loop that will run them both until they both equal zero.
Can anyone help me get the loop written please?
I am working on a model that after inputting multiple variables, I have to run solver on 1 field to equal zero then run solver on another field to equal zero and repeat this process until they are both zero.
Since they affect each other this can take multiple runs.
I have recorded a macro that is tied to a button so I just have to click back and fourth, but I would like to create a loop that will run them both until they both equal zero.
Code:
Sub CoolingWater()
'CoolingWater Macro
SolverOk SetCell:="$B$54", MaxMinVal:=3, ValueOf:="0", ByChange:="$B$53"
SolverSolve
End Sub
Sub RecycleAsh()
' RecycleAsh Macro
SolverOk SetCell:="$C$41", MaxMinVal:=3, ValueOf:="0", ByChange:="$B$41"
SolverSolve
End Sub