Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

VBA If cell "compris entre deux nombres"

BrigitteR

XLDnaute Nouveau
Bonjour,
Dans une macro, j'ai ajouté une partie de code pour colorer les cellules des colonnes A et B en rouge si la valeur de colonne C est comprise entre 7600 et 7899 (et en vert si différent). Cela marche si je mets juste >7600 ou même égal ou inférieur à un chiffre précis mais ça ne marche pas tel que je l'ai écris pour mon besoin "compris entre" ( >7600 et <7899)
Je tords le code dans tous les sens depuis vendredi mais je ne vois pas comment corriger , si quelqu'un a une idée je suis preneuse

En vous remerciant par avance,
Brigitte

Sub Colore()
Dim i As Integer

For i = 2 To 300

If Cells(i, 3) > 7600 < 7899 Then

Range(Cells(i, 1), Cells(i, 3)).Interior.Color = RGB(255, 128, 128)

Else

Range(Cells(i, 1), Cells(i, 3)).Interior.Color = RGB(128, 255, 128)



End If
Next
End Sub
 

ChTi160

XLDnaute Barbatruc
Bonjour Brigitte
Bonjour le Fil ,le Forum

ça c'est pas très Clair !Lol

VB:
If Cells(i, 3) < 7600 And Cells(i, 3) < 7899 Then 'Soit < 7899

j'aurais mis

VB:
If Cells(i, 3) > 7600 And Cells(i, 3) < 7899 Then
avec >= et <= si besoin d'égalité
Bonne journée
jean marie
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…