fonction SOLVEUR dans macro

  • Initiateur de la discussion Initiateur de la discussion melissa
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

M

melissa

Guest
(Re)bonjour,


désolé mais aujourd'hui je fais mes devoirs j'ai donc une autre question
j'ai enregistré une macro qui utilise la fonction solveur mais voilà la macro marche pas pourquoi ?????

Sub Macro10()
'
' Macro10 Macro
' Macro enregistrée le 21/10/2004 par mel
'

'
ActiveWindow.SmallScroll ToRight:=2
SolverOk SetCell:="$C$24", MaxMinVal:=3, ValueOf:="0", ByChange:="$Q$6"
SolverSolve
ActiveWindow.SmallScroll Down:=0
Selection.Copy
ActiveWindow.SmallScroll Down:=6
Range("C26").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
ActiveWindow.SmallScroll Down:=-12
Application.CutCopyMode = False
ActiveWindow.SmallScroll Down:=-12
Range("Q6").Select
ActiveCell.FormulaR1C1 = "=R[5]C[-14]"
Range("Q7").Select
End Sub



Merci une nouvelle fois à tous pour votre super aide....
 
Re

OK, c'est vrai que ma réponse était flou...
Dans l'éditeur VBE à outils | références il faut cocher la référence "solver.xls"

et tu verras dans ton explorateur de projet un nouveau dossier "références" qui renvoit à la macro complémentaire "solver.xla"

A+, bon fin de devoir

Michel
 
Bonjour Melissa, Michel_m, le forum

il faut avoir coché, avant, le solveur dans les macros complémentaires.
si cela ne marche pas, à partir d'outils/références, tu fais parcourir et tu sélectionnes le fichier solver.xla (ou solver.xls selon les versions) dans le répertoire Programs Files\Office\Macrolib\Solver

Cordialement, A+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
17
Affichages
1 K
Réponses
1
Affichages
435
Réponses
14
Affichages
900
Réponses
22
Affichages
3 K
Réponses
7
Affichages
753
Retour