Boucle sur range

Sormick Messages postés 146 Date d'inscription   Statut Membre Dernière intervention   -  
ThauTheme Messages postés 1442 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

j'ai une boucle comme ceci:
Dim rng As Range, cell As Range
Set rng = Sheets("donnees").Range("a3:a65000")
For Each cell In rng
If cell.Value <> "" Then
.....
end if
next cell

le problème c'est que ça parcoure la rangée du bas vers le haut.
et que je ne veux pas toucher à la variable (cell as range) car elle est utilisée beaucoup de fois .
je voudrais que sur la colonne (I) si il y a une valeur il passe à la prochaine cellule toujours dans le Range("a3:a65000")
Je pense ce qu'il me faudrait c'est que la boucle va de haut en bas.
Merci pour toute aide éventuelle
onfig>Windows 7 / Internet Explorer 8.0</config>

1 réponse

ThauTheme Messages postés 1442 Date d'inscription   Statut Membre Dernière intervention   160
 
Bonsoir Sormic, bonsoir le forum,

"le problème c'est que ça parcoure la rangée du bas vers le haut."

Ha bon ! Rajoute Cell.Select dans ton code et tu verras que ça parcourt du haut vers le bas !...
Sinon je n'ai pas compris ce que voulais faire avec ce bout de code tronqué...
0