[devcon]

Τάσο καλημέρα,

Μου έδωσες το έναυσμα και μέρος το προβλήματός μου λύθηκε.

Ερώτηση: Πως θα κάνω για να παραμείνει το χρώμα και όταν αλλάξω την φόρμουλα σε «0».

Θα με ρωτήσεις εάν η προϋπόθεση δεν υπάρχει για πιο λόγο να παραμείνουν τα κελία χρωματιστά;

Η απάντηση είναι ότι εφαρμογή συνέχεια προσθέτει επιπλέον γραμμές και οι εκπτώσεις αλλάζουν.
Θα ήθελα κάτι που να είναι αντίστοιχο του «.Value = .Value»

Σ' ευχαριστώ εκ των προτέρων για την υποστήριξή σου.

'Color Format Conditions 
   With Range("K" & FirstRow & ":K" & FinalRow).Select
    Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=$O$2>0"
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .Color = 65535
        .TintAndShade = 0
    End With
    Selection.FormatConditions(1).StopIfTrue = False
        End With