VBA: colorer une cellule si condition vérifée

Bonjour,

je veux créer un code en VBA pour comparer deux cellules et si la condition est vérifée colorer une cellule en rouge. Je suis débutante en VBA et ce code ne marche pas.
Par ailleurs je voudrais savoir comment on peut faire pour créer une alerte par mail par exemple si la condition est vérifiée.

Sub Alerte_prix()
'
' Alerte_prix Macro
'

Sheets("toto").Select

Dim I As Integer
Dim n As Double
Dim M As Double
Dim nb As Double

I = 6
nb = 61

For I = 6 To I = nb
n = Sheets("toto").Cells(I, 10).Value
M = (5 / 100 * n)

If Sheets("toto").Cells(I, 8).Value > M Then Sheets("toto").Cells(I, 30).interior.color = 255

Next I

End Sub

Merci d'avance !

4 réponses

  1. Contributeur
    Fait comme je dis dans mon 1er poste..
    Une mise en forme conditionnelle.
    Et ce sera automatique.
    A+
    Edit
    Et M = (5 / 100 * n)
    Serais plus simple par M = n * 0.02 pour avoir 2%
    Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
    NOTE : Je ne répond pas aux MP pour les questions techniques.
    0