voorwaardelijke opmaak onder bepaalde voorwaarde

[HanvandeG]

Excel voorwaardelijke opmaak 'uitschakelen' wanneer aan een bepaalde voorwaarde wordt voldaan

Ik heb een sheet met vijf kolommen
A: Naam
B: Factuurnummer
C: Vervaldatum
D: Factuurbedrag
E: Betaald

Ik heb nu twee regels in voorwaardelijke opmaak opgenomen.

Regel2: Formule: =$C15<(VANDAAG()+3) van toepassing op: =$A$2:$E$10
Regel1: Alleen cellen opmaken met: "Volgende week" van toepassing op: =$A$2:$E$10

Regel2: Hiermee wordt een regel gekleurd als de vervaldatum met drie dagen is overschreden
Regel1: Hiermee wordt de cel in kolom C gekleurd een week voordat de vervaldatum is bereikt.

Dat werkt prima

Nu wil ik dat als in kolom E het factuurbedrag (uit kolom D) wordt ingevuld, dat de voorwaardelijke opmaak verdwijnt (niet meer gemarkeerd wordt).

Ik heb diverse dingen geprobeerd, maar ik kom er niet uit.
B.v. met de regel : Formule: ="$D=$E" van toepassing op: =$A$2:$E$10

Wie zou mij hiermee kunnen en willen helpen?
Bij voorbaat bedankt !

 

[JEC.]

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim cell As Range
    
    If Not Intersect(Target, Columns("E:E")) Is Nothing Then
        For Each cell In Intersect(Target, Columns("E:E"))
            If cell = cell.Offset(, -1) Then
                Rows(cell.Row).FormatConditions.Delete
            End If
        Next cell
    End If
End Sub

 

[HanvandeG]

Bedankt voor uw antwoord

Hallo J Veer,

Bedankt voor uw snelle reactie.
In het bestand dat ik had bijgevoegd werkt het geweldig, echter ik werk met een ander bestand. Het bijgevoegde was als voorbeeld.
Ik heb geprobeerd om de code aan te passen in mijn bestand en dat werkt helaas niet.
Ik heb het blad gekopieerd naar een nieuw bestand, maar nu zie ik dat alles rood wordt ?? Dat is in het echte bestand niet zo.
Toch zal ik het hier bijvoegen, maar misschien is het volledige bestand met veel meer tabs nodig?

Met vriendelijke groet,
Han

 

[Enigmasmurf]

Is de V.O. via vba finaal verwijderen niet nogal drastisch?
Stel dat je per ongeluk een betaaldatum op een verkeerde rij zet en dus terug weghaalt...
Zelf zou ik het zonder change-event oplossen en dus de voorwaarden gewoon uitbreiden.
Ik doe er even eentje:

=EN($C2<(VANDAAG()+3);$E2="")

De andere krijg je ongetwijfeld zelf in elkaar gepuzzeld (?)

 

[HanvandeG]

Regel werkt niet

Hallo,

Dat zou kunnen, ik ben daar niet zo goed in thuis.
De regel =EN($C2<(VANDAAG()+3);$E2="") doet niets.

Zie het eerste bestandje dat ik heb geupload.
Die code werkte daar goed in, maar niet in mijn echte bestand. Zie mijn antwoord bij het bericht van JVeer.

Groet,
Han

 

[Enigmasmurf]

De regel =EN($C2<(VANDAAG()+3);$E2="") doet niets.

Hoezo? In je eerste bestand kan die niet anders dan correct werken.
In je tweede bestand zit je het betaalde bedrag te vergelijken met de vervaldatum
Hierbij een voorbeeldje hoe je een gelijkaardige V.O.-voorwaarde in dat tweede bestand werkend krijgt.

 

[HanvandeG]

Gelukt !

Hoi,

Hartelijk bedankt! Het werkt nu goed.

Kan de formule nog zó aangepast worden dat hij alleen werkt als het exacte bedrag van rij O in rij Q wordt ingevoerd?
Nu werkt hij n.l. ook als je b.v. 1 euro invoert.

Groeten,
Han

 

[Enigmasmurf]

Heb je dat dan niet even zelf geprobeerd?
Dat is toch enkel een kwestie van de tweede voorwaarde lichtjes aan te passen. Vervang "=EN($P4<(VANDAAG()+1);$Q4="")" door

=EN($P4<(VANDAAG()+1);$Q4<>$O4)

 

[HanvandeG]

Helemaal klaar !

Hoi,

Dank je wel!
Ja, ik heb wel zelf het e.e.a. geprobeerd, maar kwam er niet uit.
De oplossing is nu duidelijk.
Ik ben nog maar een leek dus neem het mij niet kwalijk.
In ieder geval, bedankt voor al je hulp ! :d