Boucle qui ne fonctionne pasRésolu

Question

Bonsoir je veux créer une boucle mais celle ci ne fonctionne pas, la macro X s'exécute qu'une seule fois alors qu'il devrait s"executer tant qu'on est inférieur à range S89.... voici mon code:

Dim Compteur2 As Integer
Compteur2 = Range("T7").Value
Do While Compteur2 < Range("S89").Value
With Sheets("Structure")
 .Range("B1").Value = Compteur2
 End With
Run ("macroX")
Compteur2 = Compteur2 + .Range("T7").Value
Loop

Y a t il une erreur dans la structure??

Cordialement

cs_casy · Accepted Answer

Puisque chez moi, ça marche sans problème (je n'ai pas la macro X), je pense que le problème vient de cette macro.

Vérifie que dans son exécution, elle ne redéfinie pas la feuille active, car si effectivement tu redéfinie la feuille active, tu ne va plus référencer les bonnes cellules T7 et S89 et ton calcul sera fausser.

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php

cs_casy · Answer

Tu as une erreur dans ton code, un point en trop, ce qui provoque une exception et arrete l'execution :

Compteur2 =  Compteur2 +  . 
Range("T7").Value

---- Sevyc64  (alias Casy) ----<hr size ="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php

likemonster · Answer

Exacte j'ai mal recopié mon code je m'en était rendu compte mais cela ne change rien j'ai toujours le même souci.... je comprends pas!!

cs_casy · Answer

Ben, à part cette erreur, moi je n'ai pas de problème, ça marche bien!

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php

likemonster · Answer

ça marche pas  avec les range("...") je suis obliger de mettre des valeurs numérique pour les comparaison pour que ça marche!! pourtant mes cellules ne sont pas vide...

Utilisateur anonyme · Answer

Salut,

As-tu fais un debugage pas-à-pas en placant des espions ?
Il y a surment une lecture ou un cast qui se fait mal.

__________
  Kenji

likemonster · Answer

Effectivement il y avait un with en trop dans la macroX, ducoup mais cellules ne renvoyaient pas aux bonne reference!!! Maintenant c'est bon! Merci

Boucle qui ne fonctionne pas

7 réponses

Votre réponse

Discussions similaires