Macro : Incrementer valeur cellule jusqu'à ce qu'une autre =0 Fermé

Question

Bonjour, 
Bonjour, 
Je cherche à réaliser une simple macro qui incrémente la valeur d'une cellule de 0,1 unité en boucle jusqu'à ce qu'une autre cellule soit égale à 0.
Entre ces deux cellules il y a plusieurs formules d'actualisation... donc je ne peux pas utiliser l'outil "valeur cible".
En fait il faut répéter cette opération pour plusieurs paires de cellules par page, mais j'imagine que le même code peut être utilisé ?
J'ai tout oublié de mes cours de vba, donc si quelqu'un pourrait m'aider ca serait sympa !



Configuration: Windows 7 / Mozilla 11.0

xuorel · Answer

Pourrais tu nous montrer ton fichier pour que l'on visualise mieux ta problématique ? 
pour poset un fichier : https://www.cjoint.com/

GereLestac · Answer

Bonjour Xuorel,
Merci pour ton coup de main. J'ai posté le fichier sur le lien suivant : https://www.cjoint.com/?3GDmkh33mUv
En gros je veux faire varier indépendamment les cases vertes jusqu'à ce que chaque case rose correspondante soit égale à 0.

Si tu as une solution je serai l'homme le plus heureux du monde... au moins pour aujourd'hui :)

xuorel · Answer

La solution à ton problème se trouve à mon avis plutôt dans le solver.

pour activer le solver : options > compléments > Compléments Excel (atteindre) > cocher "Solver"

ensuite le solver se trouve dans le bandeau "Données"

si on prend l'exemple du premier cas :
- tu lances le solver
- en cellule cible tu choisis ta case rouge (B34)
- en cellule variable tu choisis la verte (B21)
- tu clics sur résoudre

ta VAN est nulle pour un coût initial de 22 908.68 €.

Dis mois si cette solution te convient

Macro : Incrementer valeur cellule jusqu'à ce qu'une autre =0

3 réponses

Discussions similaires