Discussion :

[locosr]

Bonjour à tous,

J'ai besoin d'un conseil concernant l'allégement d'une procédure sub.



Voici le code. Comme vous pouvez le voir la procédure consiste à définir une plage de cellule, cette plage de cellule va ensuite être réutilisée dans une fonction fnM2 qui consiste en calcul à l'aide du solveur, pour finalement réutiliser le résultat de la fonction à la fin de ma sub. Le seul problème est que je possède plus de 1000 plages à entrer successivement, vous imaginez donc à quel point la procédure est longue lorsqu'il s'agit de lancer 1000 fois le solveur. EN gros j'ai le temps d'aller me chercher un café...

Auriez vous une idée pour alléger le temps de "calcul" ?

Merci d'avance, cordialement.

[Touffe54]

Salut locosr,

Il existe une astuce, qui permet d'accélérer le processus. Au début de ta procédure tu écris :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.ScreenUpdating = False

et à la fin de la procédure :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.ScreenUpdating = True

[amnorian]

tu peux aussi arreter le calcul automatique ca le soucis c'est qu'excel recalcule pour toute la feuille à chaque fois

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.Calculation = xlCalculationManual

et à la fin de ton code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.Calculation = xlCalculationAutomatic

[locosr]

Merci pour vos réponses

Pour Touffe54, effectivement ça permet de rogner quelque milisecondes à chaque procédure, mais dans l'absolue ça ne résout pas vraiment le problème. Pour Amnorian, j'ai testé ta procédure, et malheureusement je n'ai pas vu de gain de temps :/

En fait je me demandais s'il n'existait pas un code plus astucieux que le miens évitant de passer par les 1000 calculs de solver, mais auquel je n'aurais pas pensé. Comme je vous l'ai dit je dimensionne une plage de cellule (longue de 36 lignes), sur ma première page. La plage est ensuite envoyée dans ma fonction qui va me faire un calcul de solveur, enfin le resultat du solveur est reporté sur une autre page. Sachant que ma plage de cellule va ensuite descendre d'une ligne pour proposer une nouvelle plage de cellule et ainsi de suite. En gros il y aura environ 75 plages de cellules calculées par pages, et il existe une 15 ene de page, bref c'est très long.