Bonsoir,
mon problème et ma macro sont tous simples, mais je n'arrive pas à m'en dépêtrer.
J'ai tout simplement besoin, lorsque l'utilisateur modifie une cellule du classeur, d'exécuter automatiquement le solveur. Voici mon bout de code :
Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$6" Or Target.Address = "$G$9" Then
SolverReset
SolverAdd CellRef:="$C$22", Relation:=2, FormulaText:="$I$26"
SolverOk MaxMinVal:=3, ValueOf:="0", ByChange:="$C$28"
SolverSolve True
MsgBox "Feuille de calcul mise à jour"
End If
End Sub
Il n'y a qu'une contrainte dans le solveur et une cellule variable.
Excel me renvoit : Solveur, une erreur est survenue ou la mémoire disponible est saturée.
Quelqu'un aurait déjà rencontré ce soucis ? (Je précise que la case solveur est déjà cochée dans les références)
mon problème et ma macro sont tous simples, mais je n'arrive pas à m'en dépêtrer.
J'ai tout simplement besoin, lorsque l'utilisateur modifie une cellule du classeur, d'exécuter automatiquement le solveur. Voici mon bout de code :
Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$6" Or Target.Address = "$G$9" Then
SolverReset
SolverAdd CellRef:="$C$22", Relation:=2, FormulaText:="$I$26"
SolverOk MaxMinVal:=3, ValueOf:="0", ByChange:="$C$28"
SolverSolve True
MsgBox "Feuille de calcul mise à jour"
End If
End Sub
Il n'y a qu'une contrainte dans le solveur et une cellule variable.
Excel me renvoit : Solveur, une erreur est survenue ou la mémoire disponible est saturée.
Quelqu'un aurait déjà rencontré ce soucis ? (Je précise que la case solveur est déjà cochée dans les références)