Betinget formattering, måske nemmere med vba?

Jeg har en rapport på ca 60 kolonner. Disse kolonner har forskellige farver alt efter hvor dataindholdet kommer fra. Indimellem er der kolonner som laver valideringscheck, f.eks. at lagerantal også har lagerværdi og tilsvarende at 0 i lagerantal sikrer at der ikke er en værdi i den tilsvarende lagerværdikolonne.

Hvis en af disse check fejler vil den farve cellen rød
Alt dette skabes nemt via betinget formattering.

Det jeg så ønsker nu er kolonne a bliver rød hvis en anden cellerne i den pågældende række bliver rød. Jeg startede med en løsning hvor jeg begyndte at skrive alle betingede formatteringer igen i kolonne a, men det blev uoverskueligt så jeg ville optimalt set have en god/simplere løsning på dette?

Alternativt vil jeg skabe en vba der lige aktiveres med en knap som kontrollerer om andre celler i rækken er røde, og i så fald farver rød.
Den har jeg næsten færdig:

Sub check_for_validation_errors()
Dim LR As Long, I As Long
LR = Range("A" & Rows.Count).End(xlUp).Row
For I = 1 To LR
    Range ("B" & I) 'End(xlToRight).Column&I).Select 'hvordan vælger jeg sidste kolonne nemt her?
    If Selection.Interior.ColorIndex = 15 Then Range("a" & I).Interior.ColorIndex = 15
        Else: Next I
    End If
Next I
End Sub

Der mangler dog to ting, først og fremmest det valg at B3:ABP3 (eller hvad nu referencen er - se hvor jeg har indsat '). Derudover tænker jeg også at den skal starte med at nulstille kolonne A, hvis man ønsker at køre den igen efter man har rettet en valideringsfejl?