Bonjour le forum,
Je suis embêté avec le solveur et j'espère que quelqu'un pourra m'aider la-dessus.
Tout d'abord, je bosse sur XL200, j'ai bien le solveur installé, et solver.xla est bien actif, pas de problème la-dessus.
Ce que je voudrais faire, c'est que le solveur me trouve une solution minimale dans une de mes cellules (A18), en changeant les cellules dites variables (A14 et A15). Jusqu'ici, tout va bien. Le soucis est que A18 n'est pas calculé directement à partir de A14:A15 , mais par l'intermédiaire d'une macro: (automatique_solve). J'ai essayé l'option 'showref' pour solversolve, mais ça ne marche pas.
Voici mon code:
Sub solveur()
Sheets('REGLAGES').Select
SolverReset
SolverOptions StepThru:=True
SolverOk SetCell:='A18', MaxMinVal:=2, ValueOf:='0', ByChange:='$A$14:$A$15'
SolverAdd CellRef:='$A$14:$A$15', Relation:=4
SolverAdd CellRef:='$A$14', Relation:=3, FormulaText:='1'
SolverAdd CellRef:='$A$14', Relation:=1, FormulaText:='5'
SolverAdd CellRef:='$A$15', Relation:=3, FormulaText:='1'
SolverAdd CellRef:='$A$15', Relation:=1, FormulaText:='30'
SolverSolve True, 'automatique_solve'
endsub
Merci d'avance de votre aide.