See http://www.mvps.org/dmcritchie/excel/colors.htm for the Excel color
palette.
Green is .ColorIndex = 10
You also want to know what cell property to refer to, e.g.
ActiveCell.Interior.ColorIndex = 10.
And now you can write a custom sort routine in VBA.
I would add another column, and populate the value of cells in that
column with 1 or 0, depending on whether the
If Range("A:" & Row).Interior.ColorIndex = 10 Then
Range ("F" & Row).Value = 1
Else
Range ("F" & Row).Value = 0
End If
And then do a normal sort.