[XL-2010] Besoin d'aide boucle et offset

Bonjour à tous,

j'ai un petit problème qui m'empeche d'avancer :
dans une boucle for each...next
je traite plusieurs cellule avec un offset(i,0)

comment reprendre la boucle à la valeur i et non à la cellule suivante ?

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
For Each cell In Plage
    If cell.Offset(0, -5) <> RGB(204, 255, 255) Then
        If cell.Offset(0, 2).MergeCells Then
            n = NCF(cell.Offset(0, 2))
            If n = 2 Then
                If cell < Date And cell.Offset(, 2) <> "" Then
                    cell.Interior.Color = RGB(125, 147, 99)
                End If
                If cell.Offset(1) < Date And cell.Offset(, 2) <> "" Then
                    cell.Offset(1).Interior.Color = RGB(127, 127, 127)
                End If
            ElseIf n > 2 Then
                If cell < Date And cell.Offset(, 2) <> "" Then
                    cell.Interior.Color = RGB(125, 147, 99)
                 End If
                    For i = 1 To n - 2
                        If cell.Offset(i, 0) < Date Then
                            cell.Offset(i, 0).Interior.Color = RGB(125, 147, 99)
                         End If
                    Next i
                        If cell.Offset(n - 1, 0) < Date Then
                            cell.Offset(n - 1).Interior.Color = RGB(127, 127, 127)
                           End If
                      End If
        Else
            If cell < Date Then
                cell.Interior.Color = RGB(127, 127, 127)
               End If
        End If
next cell
    End If

Merci de votre aide