Vba colorer cellules
mariiiie
-
eriiic Messages postés 25847 Date d'inscription Statut Contributeur Dernière intervention -
eriiic Messages postés 25847 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
je voudrais colorer mes cellules en fonction d'une condition voila le code que j'ai utilisé:
If Not IsEmpty(Sheets("donnees").Range("N5")) And Sheets("donnees").[N5] < 65 Then Sheets("donnees").Range("N5").Interior.ColorIndex = 3
mais cela me colore les cellules malgré que les données soient supérieures à 65
help
je voudrais colorer mes cellules en fonction d'une condition voila le code que j'ai utilisé:
If Not IsEmpty(Sheets("donnees").Range("N5")) And Sheets("donnees").[N5] < 65 Then Sheets("donnees").Range("N5").Interior.ColorIndex = 3
mais cela me colore les cellules malgré que les données soient supérieures à 65
help
A voir également:
- Vba colorer cellules
- Colorer des cellules excel sous condition - Guide
- Excel compter cellule couleur sans vba - Guide
- Verrouiller cellules excel - Guide
- Excel additionner plusieurs cellules - Guide
- Vba récupérer valeur cellule ✓ - Forum VB / VBA
If tests Then 'traitement si test positif else 'traitement si test négatif endifce qui donne dans ton cas :
Private Sub Worksheet_Change(ByVal Target As Range) If Not IsEmpty(Range("N5")) And [N5] < 65 Then Range("N5").Interior.ColorIndex = 3 Else Range("N5").Interior.ColorIndex = xlNone End If End SubMais si tu ne connais pas les formats conditionnels penche toi dessus...
menu 'format / mise en forme conditionnelle...' sur excel 2003
eric
If tests then Sheets("donnees").Range("N5")) And Sheets("donnees").[N5] < 65
else
Sheets("donnees").Range("N5")) And Sheets("donnees").[N5] > 65
endif
est ce que je me trompe?
Mais je dois le faire avec vba quand je rentre la formule cela me met un message d'alerte