Posez votre question Signaler

Optimiser boucle en vba

-
VBA Office (Excel, Word ...) Posez votre question Signaler
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

Répondre au sujet

2 réponses

Signaler Commenter la réponse de NHenry
Messages postés
14457
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
26 mai 2019
 130
0
Merci
Sans savoir ce qu'est sensé faire le calcul, dur de répondre.
Commenter la réponse de NHenry
Signaler Commenter la réponse de keevins
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
Signaler Commenter la réponse de NHenry
NHenry
Messages postés
14457
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
26 mai 2019
 130 -
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

Votre réponse

Répondre au sujet
Posez votre question