lovelife.coeur
XLDnaute Nouveau
Bonjour,
Je souhaite réalisé une macro qui me permettrait de colorer une ligne en gris si la date et antérieur au jour actuelle ET si une cellule affiche "Oui".
Problème cette cellule est une liste à choix multiple, mon code détecte qu'il y a une condition supplémentaire pour colorer la ligne mais il n'a pas l'air de comprendre que cette condition est rempli.
Quelqu'un pourrait m'aider?
Voici mon code
Sub peremption2()
Dim i As Integer
'jeté à la poubelle
For e = 2 To 9999
If Cells(e, 3) < Cells(15, 8) And Cells(e, 5) = "Oui" Then
Range(Cells(e, 1), Cells(e, 6)).Interior.ColorIndex = 15
End If
Next e
End Sub
Si j'enlève la condition AND mon code fonctionne il y a donc un problème dans ce morceau de code mais je ne trouve pas lequel..
Je souhaite réalisé une macro qui me permettrait de colorer une ligne en gris si la date et antérieur au jour actuelle ET si une cellule affiche "Oui".
Problème cette cellule est une liste à choix multiple, mon code détecte qu'il y a une condition supplémentaire pour colorer la ligne mais il n'a pas l'air de comprendre que cette condition est rempli.
Quelqu'un pourrait m'aider?
Voici mon code
Sub peremption2()
Dim i As Integer
'jeté à la poubelle
For e = 2 To 9999
If Cells(e, 3) < Cells(15, 8) And Cells(e, 5) = "Oui" Then
Range(Cells(e, 1), Cells(e, 6)).Interior.ColorIndex = 15
End If
Next e
End Sub
Si j'enlève la condition AND mon code fonctionne il y a donc un problème dans ce morceau de code mais je ne trouve pas lequel..