sorter efter farve

Ikke umiddelbart, men du kan lave en makro, der for hver celle i kolonne C, sætter talværdien i ex. kolonne D, og så sorterer du efter denne...

Du kan ex. bruge nedenstående kode, der ser på farven i området A1:A4 og indsætter de tilhørende værdier i B1:B4.


Sub setColorValues()
'
' setColorValues Makro
' Makro indspillet 07-09-2004 af Jens-Peter Vraa Jensen
Dim r, s As Range
Set r = Range("A1:A4")
Set s = Range("B1:B4")

For i = 1 To r.Rows.Count
  CellColorIndex = r(i, 1).Interior.ColorIndex
  s(i, 1).Value = CellColorIndex
Next

   
End Sub

>jpvj

Det var ikke helt det jeg ledte efter, men jeg bruger den alligevel, så her er pointene.

tak for hjælpen