Fonction SolverReset

Cette fonction réinitialise toutes les sélections de cellules et les contraintes définies dans la boîte de dialogue Paramètres du solveur et restaure tous les paramètres figurant dans la boîte de dialogue Options du solveur sur leur valeur par défaut. Cette fonction équivaut à cliquer sur Rétablir tout in dans la boîte de dialogue Paramètres du solveur. La fonction SolverReset est appelée automatiquement lorsque vous appelez la fonction SolverLoad , si l’argument Merge est False ou omis.

Note Le complément Solveur n’est pas activé par défaut. Pour pouvoir utiliser cette fonction, il doit être activé et installé. Pour plus d’informations sur la procédure à suivre, voir Utilisation des fonctions VBA du solveur. Une fois le complément solveur installé, vous devez établir une référence à celui-ci. Dans Visual Basic Editor, avec un module actif, cliquez sur Références dans le menu Outils, puis sélectionnez Solveur sous Références disponibles. Si Solveur n’apparaît pas sous Références disponibles, cliquez sur Parcourir, puis ouvrez Solver.xlam dans le sous-dossier \Program Files\Microsoft Office\Office14\Library\SOLVER.

SolverReset( )

Exemple

Cet exemple montre comment rétablir les paramètres par défaut du Solveur avant de définir un nouveau problème.

Worksheets("Sheet1").Activate 
SolverReset 
SolverOptions Precision:=0.001 
SolverOK SetCell:=Range("TotalProfit"), _ 
 MaxMinVal:=1, _ 
 ByChange:=Range("C4:E6") 
SolverAdd CellRef:=Range("F4:F6"), _ 
 Relation:=1, _ 
 FormulaText:=100 
SolverAdd CellRef:=Range("C4:E6"), _ 
 Relation:=3, _ 
 FormulaText:=0 
SolverAdd CellRef:=Range("C4:E6"), _ 
 Relation:=4 
SolverSolve UserFinish:=False 
SolverSave SaveArea:=Range("A33") 

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.