Arrêt macro MFC quand cellule est vide

Bonjour le forum,

j'ai une macro qui me permet de mettre en évidence certaines valeurs dans une liste.

Le code est le suivant :

Range("E2").Select

Range(selection, selection.End(xlDown)).Select

For Each vcell In selection

If vcell.Offset(0, -1) <> "" Then

ach = vcell.Offset(0, -1).Value

End If

Set C = ActiveSheet.Columns("O").Find(ach, LookIn:=xlValues, lookat:=xlWhole)

If Not C Is Nothing Then

vseuil = C.Offset(0, 1)

vcell.FormatConditions.Delete

vcell.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _

Formula1:=vseuil

vcell.FormatConditions(1).Font.ColorIndex = 3

vcell.FormatConditions(1).Interior.ColorIndex = 15

je me rends compte que si dans ma liste une cellule de la colonne E est vide, la macro s'arrête. Pouvez-vous me dire quelle modif du script il faut faire pour que la macro continue même si une cellule est vide?

Merci de votre aide

Salut,

Remplace

Range(selection, selection.End(xlDown)).Select

par

Range("E2", Range("E" & Rows.Count).End(xlUp)).Select

ça devrait résoudre ton problème.

Bonjour Game Over,

c'est bon, cette modif résoud mon problème. Merci beaucoup!