achtergrong van een cel koppelen aan een waarde

[broodjeaap58]

Wie kan mij vertellen hoe ik een achtergrond aan een waarde kan koppelen. Ikw eet dat dit aan de hand van een macro moet maar kan er helemaal niks mee.

omschrijving:

Als de achtergrond van C1 rood is dan moet H2 een waarde krijgen (bijv. 1 of waar) en als deze cel groen is moet G3 een waarde krijgen.

Alvast bedankt

 

[leofact]

Dat kan ook met voorwaardelijke opmaak
Via Menu opmaak > voorwaardelijke opmaak.

 

[richard1970]

Beste leofact,

Volgens mij bedoelt hij precies het tegenovergestelde.
Anders is de vraag verkeerd omschreven.

Richard

 

[leofact]

Beste leofact,
Volgens mij bedoelt hij precies het tegenovergestelde.
Anders is de vraag verkeerd omschreven.
Richard

Nee ik denk inderdaad dat jij gelijk hebt...
Te snel gelezen.

@broodjeaap
De kleuren staan w.s. voor een bepaalde voorwaarde, die voorwaarde kun je dan gebruken om een cel een waarde te geven.
Gaat dat niet dan meot het in VBA.
Bijvoorbeeld

Sub kleur()
Dim iKleur As Integer
Dim r As Range
For Each r In Selection
    iKleur = r.Interior.ColorIndex
        If iKleur = 3 Then
                iKleur = 1
            ElseIf iKleur = 10 Then
                iKleur = 2
            Else: iKleur = -1
        End If
    r.Value = iKleur
Next r
End Sub

Deze geeft waarde 1 aan elke rode cel in een gemaakte selectie en waarde 2 aan elke groene cel.
Alle andere cellen krijgen de waarde -1
Dit kun je zelf aanpassen bij ikleur

In het bijgevoegde voorbeeld heb ik het aan een event gekoppeld
Bij elke selectie die je maakt op blad wordt afhankelijk van de kleurde waarde aan de cel 1, 2 of -1 aan de cellen in de selectie gegeven.