Bonjour à tous,
Je souhaite utiliser le solver en boucle dans une macro toute simple.
Le lancement de la macro me donne :
Sub ou Function non définie.
Or le solver est bien activé dans option/complément excel (coché) comme beaucoup de forum préconisent de le faire.
Voici le code
Do While F1.Cells(j, 1) <> ""
F1.Range("B2") = F2.Cells(j, 1)
F1.Range("B3") = F2.Cells(j, 2)
F1.Range("B4") = F2.Cells(j, 3)
SolverOk SetCell:="$F$5", MaxMinVal:=3, ValueOf:="0", ByChange:="$D$2"
SolverSolve True
F2.Cells(j, 4) = F1.Range("D2")
j = j + 1
Loop
Merci de votre aide
Fabien