Seite 1 von 1
Farbe in Grau darstellen.
Verfasst: Do, 17.03.2011 15:10
von balu
Hallo Liebe Leute.
Ich möchte ganz gerne in einem Blatt verschiedene Farben zur Auswahl anbieten, die dann per Makro an anderer Stelle in Graustufen dargestellt werden.
Gibt es so ein Makro "schon fertig zu Kaufen
", oder wer kann mir bei der Erstellung behilflich sein?
Freue mich auf eure Antworten, und bedanke mich schon mal für eure Bemühungen
.
Gruß
balu
Re: Farbe in Grau darstellen.
Verfasst: Do, 17.03.2011 16:08
von Karolus
Hallo
Evtl. könntest "red", "green" und "blue" auf die Farbwerte anwenden, die drei Werte summieren ,durch 3 teilen und den erhaltenen Wert wieder an "RGB" verfüttern...hilft dass ?
Als Function etwa so:
Code: Alles auswählen
function grauwert( farbwert )
x = int( (red( farbwert ) + green( farbwert ) + blue( farbwert )) / 3)
grauwert = rgb( x , x , x )
end function
als "farbwert" übergibst du
ocell.cellBackColor
Gruß Karo
Re: Farbe in Grau darstellen.
Verfasst: Do, 17.03.2011 18:51
von balu
Hallo Karo.
Sorry, aber irgendwie steh ich momentan mit deiner Function auf Kriegsfuß. Wie soll ich sie denn richtig aufrufen?
Oder mach ich da was falsch, dass ich "Astronomisch hohe Zahlen* dabei raus bekomme? Beispielsweise 5592405 bei (255;211;32)
Aber ansonsten ist die Idee mit einer Function nicht schlecht. Danke dafür
.
Gruß
balu
Re: Farbe in Grau darstellen.
Verfasst: Do, 17.03.2011 20:41
von Karolus
Hallo
Ich hab mal ein Beispieldok gemacht:
edit:zusätzliche Formelspalte eingefügt.
Gruß Karo
Re: Farbe in Grau darstellen.
Verfasst: Fr, 18.03.2011 17:30
von balu
Hallo Karo.
Recht Herzlichen Dank, damit komm ich nun zurecht.
Gruß
balu