Boucle VBA

Bonjour ,je voudrai ranger mes valeur dans la colonne b selon un indice "J" independant du i ,ma boucle J est fausse ,si vous pouviez m’aider a la corrigé merci d'avance

For j = 2 To 1002

For i = 2 To 1002

If Year(Sheets("PAIE").Range("S" & i).Value) = 2011 Then

Sheets("stock").Range("B" & j).Value = Month(Sheets("PAIE").Range("S" & i).Value) / 12

End If

Next i

Next j

bonsoir,

difficile de corriger sur base de ce seul code sans savoir ce que tu cherches à faire :

mais voici une proposition.

j=1

For i = 2 To 1002

If Year(Sheets("PAIE").Range("S" & i).Value) = 2011 Then

j=j+1

Sheets("stock").Range("B" & j).Value = Month(Sheets("PAIE").Range("S" & i).Value) / 12

End If

Next i

Rechercher des sujets similaires à "boucle vba"