Bonjour

J'ai fais la macro suivante (cf en bas).
Quand je la lance j'ai un message qui me demande si je veux conserver les valeurs trouvées,

"Le solveur a trouvé une solution satisfaisant toutes
les contraintes et les conditions d'optimisation.

....

Je voudrais desactiver ce message parce qu'a cause de la boucle,
il me l'affiche à chaque itération.

Quelle option faut il mettre dans le code?

Merci
Pierre


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Sub FF()
 
 
For i = 1 To 3
 
 
SolverOk SetCell:="$H$" & i, MaxMinVal:=3, ValueOf:="0", ByChange:="$B$" & i & ":$C$" & i
 
         SolverSolve userFinish:=False
         SolverSolve
 
 
Next i
End Sub