Boujour,
J'ai un problème concernant le code suivant (les erreurs sont en rouge) :
Sub RendementOpti()
Worksheets("Résultats").Activate
SolverReset
SolverOk SetCell:="$E$23", MaxMinVal:=2, ValueOf:=0, ByChange:="$D$5:$F$5", Engine:=1, EngineDesc:="GRG Nonlinear"...