Bonjour,

Depuis une cellule dont l'adresse est envoyee en argument de la macro, je cherche a parcourir la colonne vers le haut afin de detecter la premiere cellule d'une certaine couleure.
Le petit bout de code suivant me renvoie systematiquement une erreur:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Do
    Selection.Offset(-1, 0).Select
Loop While Selection.Interior.ColorIndex <> 43
iCell.Value = WorksheetFunction.Sum(Range(Selection, iCell.Offset(-1, 0)))
iCell etant la cellule en argument, donc celle a partir de laquelle on cherche. Et le but ultime de cette macro est de sommer les valeurs des cellules entre iCell et la premiere cellule de couleure recherchee.

Une idee de solution?

Merci d'avance.