Solver

[ubacubac]

bonjour,
je ne parviens pas a activer le solver à partir d'une macro, message du type sub inconnu, j ai le sentiment que c est un problème souvent rencontré.
ce problème peut il se résoudre?

Merci

PS Windows XP et EXCEL 2003

 

[Compte Supprimé 979]

Re : Solver

Salut Ubacubac,

Si tu ne nous donnes pas ton code, je ne vois pas comment on pourra t'aider 😕

A+

 

[mécano41]

Re : Solver

Bonjour,

Un exemple (ici, lancé par un bouton):

"Cible" et "CelluleVar" sont les noms de deux cellules dans la feuille

Option Explicit

Private Sub CommandButton1_Click()
ActiveSheet.Unprotect
SolverOk SetCell:="Cible", MaxMinVal:=3, ValueOf:="0", ByChange:="CellVar"
SolverSolve UserFinish:=True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub

Attention ! il faut que dans l'environnement Visual Basic, dans la fenêtre "Projet", il y ait : SOLVER (SOLVER.XLA). S'il n'y est pas, tu fais (toujours dans Visual Basic) :

Outils / Références / clic sur Solver

Si Solver n'y est pas tu fais :

Parcourir / Disque C: / Program files / Microsoft Office / Office 10 / Macrolib /Solver / parmi les fichiers .xla,tu choisis Solver.xla / ouvrir

Ensuite tu fais ce qui est dit plus haut (et si, comme moi pour ce genre de choses, tu as tendance à oublier, tu notes tout pour un autre jour... au cas où...😀).

Cordialement