OVH Cloud OVH Cloud

lancement Solver

9 réponses
Avatar
MarieP.
Bonjour!
Je n'arrive pas =E0 programmer le lancement du solver, et=20
j'ai vu le m=EAme probl=E8me chez pas mal de personnes...
Un petit coup de pouce?
D'apr=E8s la macro enregistr=E9e, le code donne ceci :

Sub AppelSolver()
SolverOk SetCell:=3D"$O$8", MaxMinVal:=3D2, ValueOf:=3D"0",=20
ByChange:=3D"$O$3:$O$6"
SolverSolve
End Sub

Mais lors de l'execution, appara=EEt le message d'erreur=20
suivant :
Erreur de Compilation
Sub ou Function non d=E9fini
et "SolverOK" est soulign=E9 dans le code

Merci beaucoup,

Marie

9 réponses

Avatar
Starwing
bonjour Marie,
Peut-être que la référence VBA du solveur n'est pas coché.

Va dans ton classeur, fait:

ALT-F11
Va dans Outils - Références
Va voir si la case SOLVER est bien cochée.

Starwing
Avatar
Clément Marcotte
Bonjour,

Si tu as Office 2002 et que tu n'as pas installé au moins le SP2,
installes le
(et tant qu'à y être, pourquoi pas le SP3).

http://support.microsoft.com/default.aspx?scid=kb;fr;320302

"MarieP." a écrit dans le
message de news:15ff501c44732$a70f2120$
Bonjour!
Je n'arrive pas à programmer le lancement du solver, et
j'ai vu le même problème chez pas mal de personnes...
Un petit coup de pouce?
D'après la macro enregistrée, le code donne ceci :

Sub AppelSolver()
SolverOk SetCell:="$O$8", MaxMinVal:=2, ValueOf:="0",
ByChange:="$O$3:$O$6"
SolverSolve
End Sub

Mais lors de l'execution, apparaît le message d'erreur
suivant :
Erreur de Compilation
Sub ou Function non défini
et "SolverOK" est souligné dans le code

Merci beaucoup,

Marie
Avatar
Marie P.
Merci de ta réponse!
Le problème c'est que, sous VB je n'ai pas de
case "solver" à cocher dans Outils/Références (et pourtant
la liste est longue...). Comment l'activer alors?
Pendant que j'y suis, une autre question si ça ne t'embête
pas : j'ai fait une combobox dans un formulaire, avec des
chiffres à sélectionner. Le problème, c'est qu'ils ne sont
pas reconnus comme chiffres et figurent dans la cellule
Excel de Sortie comme "standard" et non pas
comme "nombre". Sais-tu comment définir les éléments de la
combobox comme chiffres?
Mille fois merci d'avance

Marie

-----Message d'origine-----
bonjour Marie,
Peut-être que la référence VBA du solveur n'est pas coché.

Va dans ton classeur, fait:

ALT-F11
Va dans Outils - Références
Va voir si la case SOLVER est bien cochée.

Starwing


.



Avatar
Merci! Effectivement pas installé
(mais je trouve ça où????)

-----Message d'origine-----
Bonjour,

Si tu as Office 2002 et que tu n'as pas installé au moins
le SP2,

installes le
(et tant qu'à y être, pourquoi pas le SP3).

http://support.microsoft.com/default.aspx?
scid=kb;fr;320302


"MarieP." a écrit
dans le

message de news:15ff501c44732$a70f2120$
Bonjour!
Je n'arrive pas à programmer le lancement du solver, et
j'ai vu le même problème chez pas mal de personnes...
Un petit coup de pouce?
D'après la macro enregistrée, le code donne ceci :

Sub AppelSolver()
SolverOk SetCell:="$O$8", MaxMinVal:=2, ValueOf:="0",
ByChange:="$O$3:$O$6"
SolverSolve
End Sub

Mais lors de l'execution, apparaît le message d'erreur
suivant :
Erreur de Compilation
Sub ou Function non défini
et "SolverOK" est souligné dans le code

Merci beaucoup,

Marie

.



Avatar
Clément Marcotte
Bonjour,

Il y a un lien dans l'article.

Sinon, tu peux aussi essayer cela:

http://office.microsoft.com/officeupdate/default.aspx?CTT˜

Cliquer sur "Recherche dess. mises à jour", en haut de la deuxième
colonne


a écrit dans le message de
news:15a8601c4473b$f5448ed0$
Merci! Effectivement pas installé
(mais je trouve ça où????)

-----Message d'origine-----
Bonjour,

Si tu as Office 2002 et que tu n'as pas installé au moins
le SP2,

installes le
(et tant qu'à y être, pourquoi pas le SP3).

http://support.microsoft.com/default.aspx?
scid=kb;fr;320302


"MarieP." a écrit
dans le

message de news:15ff501c44732$a70f2120$
Bonjour!
Je n'arrive pas à programmer le lancement du solver, et
j'ai vu le même problème chez pas mal de personnes...
Un petit coup de pouce?
D'après la macro enregistrée, le code donne ceci :

Sub AppelSolver()
SolverOk SetCell:="$O$8", MaxMinVal:=2, ValueOf:="0",
ByChange:="$O$3:$O$6"
SolverSolve
End Sub

Mais lors de l'execution, apparaît le message d'erreur
suivant :
Erreur de Compilation
Sub ou Function non défini
et "SolverOK" est souligné dans le code

Merci beaucoup,

Marie

.



Avatar
merci!
Bonne soirée!

-----Message d'origine-----
Bonjour,

Il y a un lien dans l'article.

Sinon, tu peux aussi essayer cela:

http://office.microsoft.com/officeupdate/default.aspx?
CTT˜


Cliquer sur "Recherche dess. mises à jour", en haut de la
deuxième

colonne


a écrit dans le
message de

news:15a8601c4473b$f5448ed0$
Merci! Effectivement pas installé
(mais je trouve ça où????)

-----Message d'origine-----
Bonjour,

Si tu as Office 2002 et que tu n'as pas installé au moins
le SP2,

installes le
(et tant qu'à y être, pourquoi pas le SP3).

http://support.microsoft.com/default.aspx?
scid=kb;fr;320302


"MarieP." a écrit
dans le

message de news:15ff501c44732$a70f2120
$


Bonjour!
Je n'arrive pas à programmer le lancement du solver, et
j'ai vu le même problème chez pas mal de personnes...
Un petit coup de pouce?
D'après la macro enregistrée, le code donne ceci :

Sub AppelSolver()
SolverOk SetCell:="$O$8", MaxMinVal:=2, ValueOf:="0",
ByChange:="$O$3:$O$6"
SolverSolve
End Sub

Mais lors de l'execution, apparaît le message d'erreur
suivant :
Erreur de Compilation
Sub ou Function non défini
et "SolverOK" est souligné dans le code

Merci beaucoup,

Marie

.



.




Avatar
Starwing
Bonjour Marie,

Sous VB je n'ai pas de case "solver" à cocher dans
Outils/Références (et pourtant la liste est longue...).
Comment l'activer alors?

Pour utiliser le solveur en VBA, il faut :
1- Que la macro complémentaire Solver.xla soit installée
habituellement le chemin est:
C:Program FilesMicrosoft OfficeOffice10
MacrolibSolverSolver.xla
2- Que tu ajoutes une référence à cette macro
complémentaire dans le classeur où tu veux utiliser ses
fonctions/procédures.
Ça peut se faire dans l'éditeur Visual Basic
(OutilsRéférences, cocher SOLVER dans la liste et OK)

Si encore tu ne vois pas SOLVER, essaie ce qui suit et
donne suite. Va dans ta feuille excel, lance le Solveur
dans Outils-Solveur et vérifie qu'il apparaît bien. Par la
suite, Alt-F11, OutilsRéférences et regarde si tu le
trouves maintenant

Starwing
Avatar
Starwing
Bonjour Marie,


j'ai fait une combobox dans un formulaire, avec des
chiffres à sélectionner. Le problème, c'est qu'ils ne sont
pas reconnus comme chiffres et figurent dans la cellule
Excel de Sortie comme "standard" et non pas
comme "nombre". Sais-tu comment définir les éléments de la
combobox comme chiffres?

Essaie:
[A1]=combobox.value*1


Starwing
Avatar
MarieP.
Encore merci de tes conseils, c'est parfait pour la combo
box!
Pour le solver, celui-ci apparait bien maintenant, je l'ai
coché sous Outils/Référence, mais ça plante toujours :y'a
pas une erreur dans mon code?

Sub AppelSolver()
SolverOk SetCell:="$O$8", MaxMinVal:=2, ValueOf:="0",
ByChange:="$O$3:$O$6"
SolverSolve
End Sub

Lors de l'execution, apparaît le message d'erreur
suivant :
Erreur de Compilation
Sub ou Function non défini
et "SolverOK" est souligné dans le code

Si tu as le courage d'encore me répondre c'est
fantastique : rien de plus pénible que de bloquer toute
une après-midi sur le même problème!


-----Message d'origine-----
Bonjour Marie,

Sous VB je n'ai pas de case "solver" à cocher dans
Outils/Références (et pourtant la liste est longue...).
Comment l'activer alors?

Pour utiliser le solveur en VBA, il faut :
1- Que la macro complémentaire Solver.xla soit installée
habituellement le chemin est:
C:Program FilesMicrosoft OfficeOffice10
MacrolibSolverSolver.xla
2- Que tu ajoutes une référence à cette macro
complémentaire dans le classeur où tu veux utiliser ses
fonctions/procédures.
Ça peut se faire dans l'éditeur Visual Basic
(OutilsRéférences, cocher SOLVER dans la liste et OK)

Si encore tu ne vois pas SOLVER, essaie ce qui suit et
donne suite. Va dans ta feuille excel, lance le Solveur
dans Outils-Solveur et vérifie qu'il apparaît bien. Par
la

suite, Alt-F11, OutilsRéférences et regarde si tu le
trouves maintenant

Starwing

.