I'm sorry for my english. Thanks for the video. I have a question to you, if you could answer me. in the past I used the solver in this way and it worked. But now that I need it again, it says: "compile error sub or function not defined". I followed all your steps. I write you the code: Sub Macro12() ' ' Macro12 Macro ' ' Sheets("Dimensionamento collettori").Select SolverReset SolverOk SetCell:="$P$2", MaxMinVal:=1, ValueOf:=0, ByChange:="$O$2:$O$66", _ Engine:=1, EngineDesc:="GRG Nonlinear" SolverAdd CellRef:="$N$2:$N$66", Relation:=2, FormulaText:="$P$2:$P$66" SolverOk SetCell:="$P$2", MaxMinVal:=1, ValueOf:=0, ByChange:="$O$2:$O$66", _ Engine:=1, EngineDesc:="GRG Nonlinear" SolverOk SetCell:="$P$2", MaxMinVal:=1, ValueOf:=0, ByChange:="$O$2:$O$66", _ Engine:=1, EngineDesc:="GRG Nonlinear" SolverSolve End Sub The first row became yellow. Can you help me? I can't understand where it's the problem.Thanks
@Annalaura LaBorde Va ad Microsoft Visual Basic for Applications->Tools->References->seleziona (Clicka) sul Solver...e tutto έ bene nell' ultima linea (solversolve) aggiunge: solversolve userfinish:=True (il tavolo di solver chiude automaticamente) Si puό aggiunge (prima di SolverReset): Application Screen Updating = False e prima di End Sub: Application Screen Updating = True Questo per limitare il movimento dell Sheet.
Thanks a lot for this video. Especially the user finish portion of the code. Really appreciate the effort.
Excellent video Pamela, very clear and lovely explanation!
Thank you very much Pamela!!
Thank you so much, really appreciate it. I got stuck for 24 hours and now I can continue to my next project step :))
Great tutorial. Thanks, especially the VB tricks. You saved me.
Really great works, you are the mvp keep it up 👍
me hubiese gustado que lo enseñara a hacerlo desde el principio, pero fue un buen video ...
I'm sorry for my english. Thanks for the video. I have a question to you, if you could answer me.
in the past I used the solver in this way and it worked.
But now that I need it again, it says: "compile error sub or function not defined".
I followed all your steps.
I write you the code:
Sub Macro12()
'
' Macro12 Macro
'
'
Sheets("Dimensionamento collettori").Select
SolverReset
SolverOk SetCell:="$P$2", MaxMinVal:=1, ValueOf:=0, ByChange:="$O$2:$O$66", _
Engine:=1, EngineDesc:="GRG Nonlinear"
SolverAdd CellRef:="$N$2:$N$66", Relation:=2, FormulaText:="$P$2:$P$66"
SolverOk SetCell:="$P$2", MaxMinVal:=1, ValueOf:=0, ByChange:="$O$2:$O$66", _
Engine:=1, EngineDesc:="GRG Nonlinear"
SolverOk SetCell:="$P$2", MaxMinVal:=1, ValueOf:=0, ByChange:="$O$2:$O$66", _
Engine:=1, EngineDesc:="GRG Nonlinear"
SolverSolve
End Sub
The first row became yellow.
Can you help me? I can't understand where it's the problem.Thanks
@Annalaura LaBorde
Va ad Microsoft Visual Basic for Applications->Tools->References->seleziona (Clicka) sul Solver...e tutto έ bene
nell' ultima linea (solversolve) aggiunge: solversolve userfinish:=True (il tavolo di solver chiude automaticamente)
Si puό aggiunge (prima di SolverReset): Application Screen Updating = False e prima di End Sub: Application Screen Updating = True
Questo per limitare il movimento dell Sheet.
where you able to solve the problem? I have the same problem
English: In the Visual Basic tool, open macro, go to Tools, References, and make sure “Solver” is checked, hit “ok”.
@@batmojuice5704 Thankyou, I had the same problem and was able to SOLVE it with your help :p
@@batmojuice5704 Thanks, great help!