Optimiser boucle en vba

- 1 août 2016 à 18:05 - Dernière réponse :
Messages postés
14300
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
19 novembre 2018
- 6 août 2016 à 20:37
Bonjour le forum,
Je souhaite optimise cette boucle sous forme de calcul.
do while nx>p1
nx=nx-p1
p1=p1-p2
p2=p2-p3
p3=p3-p4
p4=p4-1
c=c+1
loop

merci d'avance pour vos réponse.

EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ici : ICI

Merci d'y penser dans tes prochains messages.
Afficher la suite 

Votre réponse

3 réponses

Messages postés
14300
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
19 novembre 2018
1 août 2016 à 18:11
0
Merci
Sans savoir ce qu'est sensé faire le calcul, dur de répondre.
Commenter la réponse de NHenry
0
Merci
bonjour,
voici un exemple:
nx=620113 (un chiffre compris entre 1 et 620113)
p1=211876
p2=17296
p3=1081
p4=46
c=0
en fin de boucle j’obtiens ce résultat:

nx=35292
p1=163185
p2=14190
p3=946
p4=43
c=3

Quelle formule ou méthode de calculs doit-je appliquer pour avoir le même résultat sans faire de boucle ?
merci beaucoup
Messages postés
14300
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
19 novembre 2018
- 6 août 2016 à 20:37
C'est bien de mettre un exemple, mais expliquer à quoi sert le calcul serait plus utile, car je ne vois pas la relation entre le début et la fin.
Commenter la réponse de keevins

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.