[Excel] fonction Solver, propriété ShowRef

Bonsoir,
je galère un peu avec cette propriété qui lors d'un calcul itératif permet d'éxécuter une macro complémentaire entre deux pas de calcul.
Dans un premier classeur (A) j'ai écrit le code suivant qui me génère des résultats dans un classeur différent (B)

Code:

---

1 2 3 4 5 6 7 8

SolverOk SetCell:="$B$1", MaxMinVal:=3, ValueOf:="0", ByChange:="$A$1" 'on spécifie quelle cellule contient l'équation à résoudre (ici B1), quel est le type d'équation à résoudre (y(x) >=, max ou min, y(x)=0), la valeur du second membre (ici 0) et enfin les inconnues (ici A1)   SolverOptions MaxTime:=100, Iterations:=100, Precision:=0.000001, AssumeLinear _ :=False, StepThru:=False, Estimates:=1, Derivatives:=1, SearchOption:=1, _ IntTolerance:=5, Scaling:=False, Convergence:=0.0001, AssumeNonNeg:=False 'ici on paramètre les options du solveur: ici c'est StepThru qui nous intéresse: avec la valeur False, le solveur s'arrête entre deux pas de calcul   SolverSolve Userfinish:=True , ShowRef:="LaMacroAExcecuter" 'ShowRef associée à StepThru = False permet de lancer une macro entre deux pas de calcul

---

L'aide de Excel 2000 dit que le nom de la macro à exécuter doit être une chaîne.
La macro que j'essaye d'exécuter entre deux pas de calcul se situe dans le classeur B et est déclarée comme suit

Code:

---

1 2	Sub Test()

---

J'ai successivement essayé d'exécuter cette macro en mettant

Code:

---

1 2 3 4

ShowRef:="Test" ShowRef:="LeNomDuClasseurB!Test" ShowRef:="LeNomDuClasseurB!LeNomDuModuleQuiContientLaMacroTest.Test"

---

, rien ne marche.
Franchement je vois pas.
J'ai cherché sur le forum avec les mots clefs ShowRef, Solver, j'ai rien trouvé qui pourrait résoudre mon problème.
Si quelqu'un avait une idée ça m'arrangerait bien parce que moi j'en ai plus. L'aide de Excel 2003 est muette à ce sujet.
Merci.

Bonjour

ShowRef doit pointer vers une macro Excel 4.0...

Voir http://support.microsoft.com/kb/151267/fr pour les explications.

Re bonsoir,
merci pour l'explication. Si on se résume, il me suffit d'enregistrer la macro qui m'intéresse en .xla et ça devrait marcher.
J'essaye et je reviens.
Merci encore.

Je ne parviens pas à enregistrer la macro au format Excel 4.0 dont il est question ici.
Quoi qu'il en soit il semble bien qu'on ne puisse pas exécuter autre chose qu'une macro Excel 4.0 avec ShowRef.
C'est bien dommage.

Il me semble que dans l'article de Microsoft, il est précisé qu'il n'est pas possible d'enregistrer de nouvelles macros au format XL 4.0, mais seulement de maintenir des macros existantes.

Personnellement, je ne me souviens que vaguement (voire pas du tout) des macros XL 4.0, mais il semble bien que ce soit le parcours du combattant et, à mon avis, il est difficile, voire impossible, de réaliser ce que tu souhaites.

En fait on peut encore enregistrer des macros Excel 4.0 mais c'est vrai que ça a l'air d'être particulièrement galère.

Savez-vous si on peut faire appel à une deuxième fonction solver alors qu'il y a en déjà une en cours d'exécution?

Par exemple, je suis en train de résoudre une équation, je piège l'évènement calculate de la feuille et quand l'évènement se produit, je lance la résolution d'une autre équation.

Ca m'éviterait d'avoir à écrire une méthode de résolution du type Newton Raphson directement dans le code de mon classeur pour résoudre les équations du classeur entre deux pas de calcul.

Bonjour,
en fait j'ai partiellement résolu mon problème.

Je m'explique:
dans une feuille A, j'ai un système d'équations non linéaires à résoudre. Les coefficients de ces équations ne sont pas constants et dépendent des résultats d'autres équations situées dans d'autres feuilles B, C, etc dont les coefficients dépendent eux-même des résultats du sytème d'équations de la feuille A.

D'où la nécessité de procéder de manière itérative et de résoudre les équations des feuilles B, C, etc pour chaque pas de calcul de la feuille A et l'utilisations de ShowRef.

Vu que ShowRef ne fonctionnait pas, voici comment je m'en suis sorti.

J'ai paramétré le solveur de la feuille A pour qu'il s'arrête au bout d'une itération.
Quand c'est fait je déclenche la mise à jour de mes feuilles B, C, etc pour que les équations qu'elles contiennent aient les nouveaux coefficients.
Une fois que mes feuilles B, C, etc sont à jour, je provoque la résolution des équations qu'elle contiennent.
Je mets alors la feuille A à jour pour qu'elle ait les bons coefficients et je relance le solveur pour un pas de plus et ainsi de suite.

La méthode fonctionne mais il me reste un problème: à chaque fois que le solveur atteint le nombre maximal d'itérations et qu'il détecte qu'il faudrait continuer, c'est à dire à chaque pas de ma boucle, il affiche une boîte de dialogue disant que le nombre maximal d'itérations a été atteint et demande ce qu'il doit faire: Arrêter ou continuer. Et je suis obligé de cliquer sur "Arrêter" pour passer à la résolution de des mes équations dans les feuilles B, C, etc.

Je voudrais inhiber l'affichage de cette boîte de dialogue mais je n'y parviens pas.
Voici les diverses options du solveur que j'ai essayé et qui ne résolvent pas mon problème

Code:

---

1 2 3

SolverFinish KeepFinal := 1 SolverSolve UserFinish:=True

---

Il me reste juste ce problème à régler pour que ça fonctionne.
Merci pour vos réponses.