Betinget formattering

Du farvelægger dem manuelt mens du kan se farverne, derefter fjernes betinget formatering

Ja, det havde jeg nu allerede selv regnet ud, men jeg har ikke lyst til at farvelægge flere tusnde celler manuelt

Prøv lige at makere hele arket.
vælg kopier
indsæt et nyt ark
vælg indsæt speciel værdier.
vælg indsæt speciel formater

se om farverne følger med

det virker desværre ikke

Farverne følger med, men det gør den formatterede formattering også, og så er jeg lige vidt

Du kan lave en makro, der skifter selv, men her er farverne rigtig sat i cellerne.

Den gør faktisk det samme som betinget formatering, men ligger ikke og kører i baggrunden.

ret makroen til med de samme indstillinger som i din betinget formatering.

kør så makroen og du kan fjerne din betingede formatering.

Sub Farveskift()
Dim icolor As Integer
For Each C In Range("A1:x50") ' ret dit område til
Select Case C
  Case 0
      icolor = xlNone ' ingen værdi ingen farve
  Case 1 To 5
    icolor = 6
  Case 6 To 10
    icolor = 12
  Case 11 To 15
    icolor = 7
  Case 16 To 20
    icolor = 53
  Case 21 To 25
    icolor = 15
  Case 26 To 30
    icolor = 42
  Case Else
icolor = xlNone
End Select
  C.Interior.ColorIndex = icolor
Next
   
End Sub

Lukketid.

Oprydningstid og lukketid længe overskredet. Kabbak, dit svar var ikke umiddelbart anvendeligt. Fandt selv anden løsning: ny kolonne med samme betingelser som under den formatterede betingelse og så sortering med ny kolonne som første prioritet. Så var manuel farvelægning overkommelig.