Excel - Съвет за копиране стойностите на оцветени клетки

Използвам Excel 2003. Имам работещ макрос за смяна цвета на клетки в зависимост от цветовия им индекс. Работи без проблеми.

Код:

---

SubChangeColor()
Dim cell As Range
For Each cell in Range("E8:AM175")
If cell.Interior.ColorIndex < 0 Then
'Тук да копира ( или маркира) стойностите на клетките само които са с цвят < 0
cell.Interior.ColorIndex = 3


End If
Next cell
End Sub

---

Как да се преработи ? Или с други думи макрос за да се копират стойностите на клетки - Range("E8:AM175") които са с цвят < 0