Solver Excel
Clément Marcotte
vaille la peine d'en envoyer.
http://disciplus.simplex.free.fr/mpfe/extra-gif/fichiers-joints.gif
http://dj.joss.free.fr/netiquet.htm
--
L'urgent est déjà parti, l'impossible est en train de se faire; pour les
miracles nous demandons 24 heures de plus.
"Pascal" <pascald...@hotmail.com> a écrit dans le message de news:
f2e801c2160a$bbfa6af0$9be62ecf@tkmsftngxa03...
Bonjour a tous,
Quelqu'un sait-il me dire si on sait utiliser le solver de
Excel via une application VB.Net? Merci infiniment a ceux
qui savent me repondre, meme la moindre piste est la
bienvenue.
Ce que je voudrais faire, c'est exactement comme dans le
fichier excell attaché, mais dans une application autonome.
Dans le formule suivante :
0 = P - (NC + (FCF1/(1+k)^t) + (FCF2/(1+k)^t+1) + (FCF3/
(1+k)^t+1) * (((1-((1+g1)/(1+k))^5)/(k-g1) + ((1-((1+g1)/
(1+k))^5)/(k-g2))
je connais toute les variables sauf le k. Je dois utiliser
le solver pour trouver ce k, en faisant tendre la formule
vers ZERO.
Merci de me donner un coup de main, si possible, je suis
completement perdu. Je ne sais pas simuler ce solver dans
VB.Net...
Merci de votre aide!
Pascal
Daniel.J
Un tour sur la FAQ PLEASE
Daniel
FAQ du Forum Microsoft Public Fr Excel
http://dj.joss.free.fr/faq.htm
Monique Brunel
--
Amicalement,
Monique (la Wallonne)
http://users.skynet.be/osga , pour les amateurs d'athlétisme
"Clément Marcotte" <clement....@sympatico.ca> a écrit dans le
message news: eE5eK5hFCHA.2276@tkmsftngp02...
Frédéric Sigonneau
Depuis VB.net, tu devrais pouvoir piloter Excel et le solveur en utilisant OLE.
Le code ci-dessous (non testé), te donnera peut-être des pistes intéressantes.
Si tu arrives à en faire quelque chose qui fonctionne, merci de nous tenir au
courant :-)
FS
--
Frédéric Sigonneau [né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
'=========================
'Utilisation du solveur par OLE Automation
'johnf87, mpep
Sub RunSolverFromOLE()
Dim MyXL As Object ' Variable to hold reference to Microsoft Excel
Dim xlBook As Object
Dim xlSheet As Object
Dim ActSheet As Object
Set MyXL = New Excel.Application
' Create new workbook and worksheet
' objects.
Set xlBook = MyXL.Workbooks.Add
Set xlSheet = MyXL.Worksheets("Sheet1")
'Set up Solver problem.
Set ActSheet = xlSheet
MsgBox "The name of the active sheet is " & ActiveSheet.Name
MyXL.Application.Visible = True
If AddIns("Solver Add-In").Installed Then
' Reference Solver in the VBE (Visual Basic Editor in Excel)
MyXL.VBE.ActiveVBProject.References.Addfromfile _
("D:\Program Files\MSOffice 97\Office\Library\Solver\Solver.xla")
' Note that your location maybe --and probably is -- different!!
Else
' Install solver here
' Reference Solver in the VBE (Visual Basic Editor in Excel)
MyXL.VBE.ActiveVBProject.References.Addfromfile _
("D:\Program Files\MSOffice 97\Office\Library\Solver\Solver.xla")
' Note that your location may be -- and probably is -- different!!
MsgBox "Solver.xla not Found! Exiting :.("
MyXL.Quit
Set MyXL = Nothing ' Release reference to the
' application and spreadsheet.
Set xlBook = Nothing
Set xlSheet = Nothing
Exit Sub
End If
Application.Run ("Solver.xla!SolverReset ")
'Just a test. Do all your solver stuff here.
Application.DisplayAlerts = False 'Don't ask to save the workbook or
sheet.
'(And don't tell)
' Close Microsoft Excel with the Quit method & don't save sheet (see above).
MyXL.Quit
Set MyXL = Nothing ' Release reference to the
' application and spreadsheet.
Set xlBook = Nothing
Set xlSheet = Nothing
End Sub
'=========================
Pascal a écrit :
>
> Bonjour a tous,
>
> Quelqu'un sait-il me dire si on sait utiliser le solver de
> Excel via une application VB.Net? Merci infiniment a ceux
> qui savent me repondre, meme la moindre piste est la
> bienvenue.
>
> Ce que je voudrais faire, c'est exactement comme dans le
> fichier excell attaché, mais dans une application autonome.
>
> Dans le formule suivante :
>
> 0 = P - (NC + (FCF1/(1+k)^t) + (FCF2/(1+k)^t+1) + (FCF3/
> (1+k)^t+1) * (((1-((1+g1)/(1+k))^5)/(k-g1) + ((1-((1+g1)/
> (1+k))^5)/(k-g2))
>
> je connais toute les variables sauf le k. Je dois utiliser
> le solver pour trouver ce k, en faisant tendre la formule
> vers ZERO.
>
> Merci de me donner un coup de main, si possible, je suis
> completement perdu. Je ne sais pas simuler ce solver dans
> VB.Net...
>
> Merci de votre aide!
>
> Pascal
>
> --------------------------------------------------------------------------------
> Name: Model.xls
> Model.xls Type: Microsoft Excel Worksheet (application/vnd.ms-excel)
> Encoding: base64
Pascal
un petit tour sur la FAQ... Suffisait de le dire...
Le probleme, c'est que je ne voyais pas vraiment comment
expliquer mon probleme... Mais en gros ce que je voudrais
faire, c'est une toute petite application qui me donne le
resultat d'une equation qui demande, dans excel,
l'utilisatation du solver.
Alors, plusieurs solutions sont possibles amon avis:
1) Ecrire un solver ---> j'en suis tout a fait incapable
2) Trouver des produits tiers ---> sur ce point, j'ai
deniché les deux produits suivants:
http://www.palisade-europe.com/francais/evolver.html
http://www.solver.com/dllplatform.htm
Mais je n'y comprends rien. Si quelqu'un, par miracle,
connaissait un de ces deux produits, je lui serait
reconnaissant de se manifester.
3) Utiliser le solver de excel dans un programme VB (je
vais regarder le bout de code posté par Frederic
Signonneau)
Le but de cette petite application est de me simplifier la
vie, et a usage personnel. D'ailleurs, je n'hesiterais pas
a posté le code complet sur ce forum quand "on" aura
trouvé. Je crois que ce petit programme est interessant
sur le plan utilitaire et pedagogique...
Voila, si parmi vous, quelqu'un s'est deja penché sur le
sujet, ce serait sympa de dialoguer...
Merci beaucoup et sorry encore pour le fichier joint!
Pascal Devulder
>-----Message d'origine-----
>.
>
Pascal
recommencerais plus... Generalement, quand on me dit une
fois les choses, je les retiens bien ... ;)
Ceci etant dit, pourrais-je te demander de jeter une petit
coup d'oeuil a mon probleme, en lisant la reponse faite a
Daniel.J.
Je te remercie d'avance et vraiment confus pour
l'attachement d'hier.
Merci
Pascal Devulder
>-----Message d'origine-----
>.
>
Monique Brunel
bienvenue sur mpfe :-)
Aux départ, les groupes de discussion (Usenet) étaient uniquement
destinés à être suivis via un logiciel de messagerie (Outlook Express,
Netscape...). L'utilisateur charge (par modem le plus souvent d'où
l'importance de la légèreté) les messages sur son disque dur, il peut
donc en présenter la liste comme il le souhaite, établir des règles
d'affichage...
Puis des sites, de plus en plus nombreux, ont mis une page forum à la
disposition de leurs lecteurs. Le principe en est tout différent. On ne
charge rien, on répond en ligne...
Mais les deux types de forum n'avaient aucun lien entre eux.
Aujourd'hui, certaines grosses sociétés donnent la possibilité de suivre
un groupe de discussion de la hiérarchie Usenet directement sur leurs
pages.
Et les problèmes sont devenus beaucoup plus nombreux : en arrivant sur
le forum via CDO, le nouveau ne sait peut-être même pas que son message
peut être lu autrement !
Sur mpfe, il y a une moyenne de 250 messages par jour (332 hier !). Il
est presque impossible aux habitués de ne pas réagir. Chacun le fait
selon son tempérament, son humeur...
Quand vraiment un classeur est indispensable à la compréhension du
problème, il est toujours possible de l'envoyer en bal perso à ceux qui
l'acceptent.
Avec les sites proposés dans ce message d'accueil, tu disposeras de
macros, trucs et astuces, classeurs à télécharger... Quelques pages
traitent du solveur
http://cherbe.free.fr/XL_avance.html#solveur
http://jacxl.free.fr/cours_xl/scenarios.html
http://xlbysteph.free.fr/aideinformatique/aidesolveur.htm
http://www.fundp.ac.be/~jmlamber/
Pour connaître les habitudes de mpfe (et les erreurs à éviter, comme les
fichiers joints...), tu peux lire ces messages publiés régulièrement
ici, avec l'un de ces intitulés
- FAQ MPFE
- [Charte] du forum MPFE
et consulter ces pages
http://dj.joss.free.fr/netiquet.htm (nétiquette, conseils...)
http://disciplus.simplex.free.fr/mpfe/connection.htm
(connexion,conseils...), à consulter absolument si tu suis le forum
depuis une page web (la solution la moins efficace et la moins
confortable) ou avec le serveur de Wanadoo (très peu performant quant au
délai d'affichage et au nombre de messages publiés).
Pour les débutants, voilà 5 bons trucs pour apprendre vite :
- utiliser souvent l'enregistreur de macro et analyser le code obtenu
- utiliser la touche F1 pour appeler l'aide (à propos du mot-clef, en
VBA, sur lequel se trouve le curseur)
- tester et essayer de comprendre des réponses faites à d'autres
- consulter souvent les sites renseignés
- ne jamais hésiter à poser des questions sur le forum
Voici la liste des sites dédiés à Excel, réalisés par des mpfie(ne)s et
que nous devons tous avoir dans nos favoris.
Débutant ou utilisateur confirmé, tu y trouveras de quoi apprendre,
progresser et résoudre bien des problèmes.
(la date d'une mise à jour est signalée par ** ** )
http://dj.joss.free.fr/faq.htm **06/05/02 **
la FAQ du forum, mise en oeuvre par Daniel et à lire absolument par tout
nouveau sur mpfe : la bonne manière de participer au forum (charte,
souriettes, abréviations...), liens, bibliographie, les réponses aux
questions le plus souvent posées, des trucs et astuces, un moteur de
recherche interne et externe (Yahoo), une page débutants
http://disciplus.simplex.free.fr/ ** 10/06/02 **
le site humoro-ludique de Misange : une importante rubrique "Trucs et
astuces", des classeurs à télécharger, un glossaire, une page débutants,
des jeux en VBA... et un méta-moteur de recherche sur 6 sites de cette
liste...
mais aussi tout ce qui fait "l'esprit mpfe", les perles, les gifs...
et,sur http://fotoflo.free.fr/ les photos des soupers/dîners de mpfe
http://longre.free.fr/
le site de Laurent, notre Grand Chef à Quatre Plumes : de très nombreux
liens commentés, les macros pointues de Laurent... (techniques de
programmation, calculs de dates et d'heures, Api...)
http://jacxl.free.fr/mpfe/ ** 17/05/02 **
le site de J@C : les graphiques, la bourse, le Web, un cours VBA, un
moteur de recherche à la page Aide... et le trombinoscope des
mpfien(ne)s
http://ericrenaud.free.fr/index.html ** 15/05/02 **
le site d'Eric : particulièrement destiné aux débutants (UserForm...)
http://perso.wanadoo.fr/frederic.sigonneau ** 26/08/01**
le site de Frédéric : gestions de temps, VBA pour Excel... une mine d'or
de macros
http://xlbysteph.free.fr/aideinformatique/web.htm ** 15/10/01 **
le site de Stéphane : cours VBA, Excel 4 (ou 5) et Excel 97/2000...
http://perso.club-internet.fr/bdafonse
le site de Bruno : formules, classeurs à télécharger...
http://cherbe.free.fr/ ** 21/01/02 **
le site de Christian : initiation à Excel, initiation à VBA, Excel
avancé sans VBA... (cours à télécharger)
http://www.ilyapa.net/excel/ ** 22/05/02 **
le site de Pascal : procédures VBA, composants par
l'exemple,calendriers, jeux
http://intendant.free.fr/ ** 13/03/02 **
le site de Thierry : cours VBA (début et perfectionnement), graphique,
Excel en bureautique...
http://www.polykromy.com/ ** 07/05/02 **
le site de Gaëtan : cours sur Excel sans VBA, les couleurs, des astuces
animées...
http://www.excel-downloads.com ** 16/05/02 **
le site de David, des programmes Excel à télécharger
http://www.anthony-penel.fr.st
le site d'Anthony : des macros appliquées à la finance
http://www.fundp.ac.be/~jmlamber/
le site de Jean-Marie : initiation VBA, TCD, listes, solveur...
http://www.ibelgique.com/OfficeAssistant ** 08/08/01 **
le site de Bureauticien : nombreux exemples résolus par VBA,fonctions...
http://www.cathyastuce.com/index.htm ** 15/12/01 **
le site de Cathy : cours Excel avec ou sans VBA...
http://perso.wanadoo.fr/jean.duprat
le site de Papy Jean : fiches Excel pour débutants...
http://www.ifrance.com/fleguen/excel.html
le site de Konga : des classeurs d'exercices (fonctions, macros)
Pour une collection très fouillée d'adresses (avec commentaires) :
le classeur de Clément M, à télécharger sur disciplus
Favoris.xls
Et un lien à y ajouter, la liste des constantes intrinsèques de VBA avec
leur valeur numérique (par versions d'Excel) :
http://support.microsoft.com/support/kb/articles/Q112/6/71.ASP
(télécharger: wc0993.exe)
Pour le passage de Excel 4 à Excel 97, un lien proposé par Geo
http://www.microsoft.com/FRANCE/officedev/infotech/info.asp?mar=/FRANCE/
officedev/infotech/MacroXLtoVBA.html
(le lien tient sur plusieurs lignes, il se termine par html)
Enfin, pour retrouver d'anciens messages, tu peux aller sur
http://groups.google.com/advanced_group_search
avec les conseils de Clément M pour obtenir les meilleurs résultats :
--- Là, il y a un écran "bilingue" qui permet de faire une recherche
plus ou moins pointue, selon les informations dont l'on dispose.
Une fois que l'on a repéré un message, il est possible de récupérer
l'ensemble de la ficelle, en cliquant sur "Voyez Fil de Discussion (x
articles)".
Je me suis aperçu que Google fonctionnait très mal quand on fait une
recherche avec un nom qui contient des accents. Il semble donc
préférable d'utiliser l'adresse électronique comme nom d'auteur.
Auteur clement....@sympatico.ca => 3.450 messages
Auteur Clément Marcotte => 1 message
Auteur Clément_Marcotte => 0 message ---
Bonne lecture et à bientôt sur mpfe.
--
Amicalement,
au nom des mpfiens et mpfiennes,
Monique (la Wallonne)
http://users.skynet.be/osga , pour les amateurs d'athlétisme
"Pascal" <pascald...@hotmail.com> a écrit dans le message news:
dcad01c21697$9d57e090$9ee62ecf@tkmsftngxa05...
Pascal
Mais apparement, ce que je veux faire doit etre soit fou
soit irrealisable... Personne n'en parle... Je ne trouve
pas de literrature la dessus... Pourant, je suis persuadé
que cela vaut la chandelle.
Crois-tu que je dois reposter ma question, afin qu'elle
soit a nouveau lue par un maximum de personnes?
Merci encore
Pascal Devulder
>-----Message d'origine-----
>http://dj.joss.free.fr/faq.htm **06/05/02 *Í{ wÀ #
Í z42 zOsz ì_ *
Paul
Bonjour,
La réponse de Fréderic me paraissait pertinente.
Elle ne t'aide pas?
A+
Paul
"Pascal" <pascald...@hotmail.com> a écrit dans le message de news:
fd9801c216dc$cdde0150$3aef2ecf@TKMSFTNGXA09...
Clément Marcotte
http://support.microsoft.com/default.aspx?scid=kb;FR;q146606
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q82890
--
L'urgent est déjà parti, l'impossible est en train de se faire; pour les
miracles nous demandons 24 heures de plus.
"Pascal" <pascald...@hotmail.com> a écrit dans le message de news:
Pascal
Merci pour cette reponse. La reponse de Frederic est
effectivement interessante. Je l'en remercie d'ailleurs.
J'ai essayé en vain de la mettre en oeuvre, dans VB et
dans VB. Net. Dans VB, effectivement, cela avait
fonctionné (je dois encore chercher pour introduire les
parametres du solver via le code). Par contre dans VB.
Net, cela ne fonctionne pas (Arggggghhh) Donc, je vais
essayer de mettre ce code a la sauce VB. NEt....
Mais ca je suppose que c'est une autre histoire.....
Merci encore a tous,
Pascal
>-----Message d'origine-----
>>- Í{ wÀ Q <N¡}´-s}ì?( ìõ utiliser souvent
>.
>
Monique Brunel
Comme les mpfien(ne)s susceptibles de répondre à ta question utilisent
OE ou NN, il est préférable de rester dans cette ficelle pour le moment.
Par contre, si après avoir progressé dans tes recherches, tu veux poser
une question plus précise, tu peux lancer une nouvelle ficelle où tu
expliques ce que tu as déjà essayé.
As-tu essayé une recherche dans les archives du forum avec Google ?
L'utilisation du solveur ne fait pas partie des questions souvent
posées, mais il y a quand même quelques ficelles sur le sujet.
Bon courage
--
Amicalement,
Monique (la Wallonne)
http://users.skynet.be/osga , pour les amateurs d'athlétisme
"Pascal" <pascald...@hotmail.com> a écrit dans le message news:
fd9801c216dc$cdde0150$3aef2ecf@TKMSFTNGXA09...