vba boucle for

Question

Bonjour, 

j'ai un problème pour sélectionner des cellules à l'aide d'une boucle for,
je souhaite que la cellule devienne rouge lorsque la valeur est inférieur à une autre cellule.
Quand je fais la boucle if cellule par cellule, ça marche, mais quand je souhaite faire une selection de plusieurs cellule avec une boucle for, ça ne marche plus.
Je ne sais jamais quoi utilisé entre Range et Cells, j'ai cru comprendre qu'avec la boucle for il fallait Cells mais ca ne marche pas.

les trois premiers marche mais la boucle for non, voici ce que ça donne

Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("E5") < Range("D5") Then
        Range("E5").Interior.ColorIndex = 3
        Else: Range("E5").Interior.ColorIndex = 4
    End If
    If Range("E6") < Range("D6") Then
        Range("E6").Interior.ColorIndex = 4
        Else: Range("E6").Interior.ColorIndex = 3
    End If
    If Range("E7") < Range("D7") Then
        Range("E7").Interior.ColorIndex = 3
        Else: Range("E7").Interior.ColorIndex = 4
    End If
    For i = 16 To 24
    Next
    If Cells(6, i).Value > Cells(4, i).Value Then
        Cells(6, i).Interior.ColorIndex = 4
        Else: Cells(6, i).Interior.ColorIndex = 3
    End If
End Sub

Merci

Configuration: Windows XP / Firefox 3.0.7

miomio51 · Answer

c'est bon , j'ai trouvé la solution, désolé j'avais un problème avec le range que j'exploiter mal avec le i.
Cependant il me reste une question, comment mettre à part une valeur de i pour laquelle il ne devra rien se passé?

Vba boucle for

1 réponse

Discussions similaires

Newsletters