Traduire un algorithme en code VBA

zain@ Messages postés 8 Statut Membre -  
cousinhub29 Messages postés 1113 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Quelqu'un peut me traduire cet algorithme en code VBA

Déclarer 2 entier i et i 


pour i allant de 2 à 8000 faire 
      pour j allant de 3 à 1000 faire 

      si valeurderange(B , i) > valeurderange(G, 3) 
          et si valeurderange(B , i) < valeurderange(H, 3) 
         
        Alors valeurderange(K, j) = valeurderange(B , i) 

t=i+1 

      valeurderange(L, j) = valeurderange(B , t) 
              Fin Si 
      Fin Si


UN COUP DE MAN SVP

Merci

1 réponse

  1.
    cousinhub29 Messages postés 1113 Date d'inscription   Statut Membre Dernière intervention   383
     
    Bonjour,

    Au lieu de donner l'algorithme, si tu expliquais exactement ce que tu veux faire?

    Parce que là, tu fais pas loin de 800 000 boucles.....

    Peut-être existe-t-il une autre manière d'arriver à ton résultat?

    Le mieux serait que tu mettes un fichier exemple sur cjoint, avec quelques données bidons, et en expliquant ce que tu veux au final...

    Bon courage
    0