Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
compte = Cells(Rows.Count, 79).End(xlUp)(2).Row
 
    For j = 102 To 225 Step 123
 
        For i = compte + 4 To compte + 23
 
            wbrecu.ActiveSheet.Cells(i - 4, 79).Value = wbcache.ActiveSheet.Cells(j, i).Value
 
        Next i
        compte = Cells(Rows.Count, 79).End(xlUp)(2).Row
    Next j
Bonjour ce que je veux faire c'est de faire en sorte que le i de wbcache augmente toujours de 4 à 23.

Est-ce que je peux faire une boucle for avec to variable dedans dans le style

for i = blablabla to blablabla and k = 4 to 23

Mon k remplacerai le i de cette cellule

Merci

Marie