Bonjour à tous,

Je code un module qui comporte une partie Solver dont voici les lignes:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
SolverReset
SolverOK SetCell:=Range("rng_vol"), MaxMinVal:=2, ByChange:=Range("rng_weight")
SolverAdd CellRef:=Range("rng_sum"), Relation:=2, FormulaText:=1
SolverAdd CellRef:=Range("rng_ret"), Relation:=3, FormulaText:=Range("rng_target")
SolverOptions AssumeNonNeg:=True
SolverSolve userfinish:=True
Mon problème est que la 1ère contraitne, celle sur la cellule rng_sum, n'est pas prise en compte. Quand je vais manuellement dans le Solver après avoir lancé mon code, la 2ème contrainte apparaît bien, mais pas la 1ère... Et si je l'ajoute à la main (cellule rng_sum = 1), elle est bien prise en compte et le Solver fonctionne comme je le souhaite.

Merci si vous pouvez m'éclairer,

Clément