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
14356
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
14 janvier 2019
 365
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
14356
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
14 janvier 2019
 365 -
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
S'inscrire maintenant

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.