Als funktie in combinatie met opvulkleur

[Whoami]

Hallo,

zou iemand mij kunnen vertellen of, en indien ja hoe, je het voor elkaar krijgt
om de ALS funktie te gebruiken in combinatie met de opvulkleur van een cel ?

Voorbeeld :
Cel A1 heeft als opvul kleur geel.
Cel B1 wordt 1 als A1 geel heeft als opvulkleur en 2 als dit niet geel is .

Bij voorbaat dank

 

[LucHeyndrickx]

Draai de zaken om:
Werk met voorwaardelijke opmaak om je cel een kleur te geven afhankelijk van de waarde.

Luc

 

[Whoami]

Hallo,

dank voor je reactie,
Dat zou ik wel willen maar het wordt via een koppeling met of zonder kleur
aangeleverd. Dus ik moet op basis van de gezette/geleverder kleur acties ondernemen.

 

[LucHeyndrickx]

En wat als het toevallig 's een ander soortje geel is?

Luc

 

[richard1970]

Met 'soortje geel' bedoeld Luc waarschijnlijk dat iedere kleur in Excel een eigen nummertje heeft.
En dan hebben we het nog niet over de discussie wanneer iets nog geel is of al groen, en wanneer iets nog groen is en nog geen blauw. (Die discussies hebben wij op het werk gehad. Het ging toen over de kleur van de auto van en collega. Strijd eindigde onbeslist)

Richard

 

[Whoami]

Initieel worden de kleuren default gezet door de externe aanlevering.

Deze veranderen niet. ( zo zegt men, dus gaan we daar maar vanuit ).

Die discussie laat ik ook graag bij de leverancier.

 

[LucHeyndrickx]

Allee... 'k zal dan maar 's een aanzet geven om je (of je leverancier) verder te laten prutsen met z'n slechte gewoontes:

http://www.cpearson.com/excel/colors.htm

Luc

 

[franç]

zou iemand mij kunnen vertellen of, en indien ja hoe, je het voor elkaar krijgtom de ALS funktie te gebruiken in combinatie met de opvulkleur van een cel ?
Voorbeeld :
Cel A1 heeft als opvul kleur geel.
Cel B1 wordt 1 als A1 geel heeft als opvulkleur en 2 als dit niet geel is .

Oplossing van het VOORBEELD:
Klik met de rechtermuisknop op de tab van het werkblad waarvoor de code moet gelden, kies "Programmacode weergeven" en plaats rechts-bovenaan onderstaande tekst. Selecteer daarna in het betreffende werkblad een willekeurige cel.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("A1").Interior.ColorIndex = 6 Then
Range("B1").Value = 1
Else
Range("B1").Value = 2
End If
End Sub

 

[lcodee]

Weke kleur

Je zult eerst moeten uitzoeken welke kleur je nodig hebt. Er zijn 56 kleuren die te gebruiken zijn. In de bijgevoegde file vind je ze met het kleurindexnr.

Je kunt het niet via een formule in het worksheet doen. Er moet een macro voor worden geschreven, maar dan is het mogelijk.

Je vind de code in het bijgevoegde workbook in de macro valideren

 

[Whoami]

Je zult eerst moeten uitzoeken welke kleur je nodig hebt. Er zijn 56 kleuren die te gebruiken zijn. In de bijgevoegde file vind je ze met het kleurindexnr.

Je kunt het niet via een formule in het worksheet doen. Er moet een macro voor worden geschreven, maar dan is het mogelijk.

Je vind de code in het bijgevoegde workbook in de macro valideren

Thanks, zal het gaan inzien en proberen.