Comment décrémenter une boucle for... Next sur EXCEL [Résolu]
fitzjames55
Messages postés mardi 8 juin 2004Date d'inscription
27 février 2009
Dernière intervention
-
12 juil. 2005 à 17:20 - Dernière réponse : cs_Jack14010
Messages postés samedi 29 décembre 2001Date d'inscription
28 août 2015
Dernière intervention
- 12 juil. 2005 à 18:06
J'utilise excel 2003 sous NT, et j'aimerai savoir s'il est possible de décrémenter une boucle for... Next .
Voici mon problème :
j'ai écrit une macro qui delete mes lignes ou la colonne L à pour valeur "clos" et ma colonne V à pour valeur zéro.
Mon souci est après le delete il va à la ligne suivante et ne reste pas sur la même ligne ou il peut avoir les même conditions .
Donc j'aimerais savoir après le delete comment décérmenter ma boucle.
ci joint la macro :
Dim i As Integer
Dim varboucl As Integer
Dim noCLOS As String
Dim noAllou As String
Dim noDoc As String
'Supprime les lignes dont les n° de projets sont clos et alloué sifa = 0
For varboucl = 10 To 478 '<= Nombre de lignes!!!
noCLOS = Worksheets(4).Range("L" & CStr(varboucl)).Value
noAllou = Worksheets(4).Range("V" & CStr(varboucl)).Value
noDoc = Worksheets(4).Range("A" & CStr(varboucl)).Value
If noAllou = "" Then Exit For If noCLOS "CLOS" And noAllou "0" Then
Worksheets(4).Range("A" & CStr(varboucl)).EntireRow.Delete
End If
Next varboucl