Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
984to988
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
984to988
984to988
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Farbe von Farbwert (Zahl) ermitteln

Farbe von Farbwert (Zahl) ermitteln
11.06.2008 16:04:16
Farbwert
Hallo,
folgendes Makro habe irgendwo in diesem Forum gefunden.
Mit der SummeWenn kann man dann auch die Total-Werte jeder Zahl ermitteln.
Nun würde mich aber interessieren, ob man umgekehrt eine Zahl eingeben kann und mit dieser
Zahl in der Zellen Rechts die Farbe erstellen kann.
z.B. 8 in C2 eingeben, und in B2 die entsprechende Farbe "malen"
Danke für Hilfe
Markus

Function Farbe(Zelle)
' Farbindex der Hintergrundfarbe der Zelle ermitteln
' z.B. Zelle B1 einfärben,
' in Zelle C1 folgende Formel eingeben:
' =farbe(B1)
Farbe = Zelle.Interior.ColorIndex
End Function


6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Excelformel kann also keine anderen Zellen ändern?
11.06.2008 16:38:40
Tobias
Folgender Lösungsansatz war erfolglos: 

Function Färben(ZielZelle As Range, Farbe As Variant) As String
ZielZelle.Interior.ColorIndex = Farbe
End Function


Das brachte mich auf die Idee die Funktion ZellenÄndern zu schreiben: 


Function ZellenÄndern(ZielZelle As Range) As String
ZielZelle.Value = 5
End Function


Auch diese Funktion war erfolglos.
Das heißt dann wohl, dass Excelformeln keine anderen Zellen verändern dürfen. Stimmt das so? Das wäre doch eine bemerkenswerte Erkenntnis.
Schönen Gruß, Tobias
http://www.tobiasschmid.de/

Anzeige
AW: Excelformel kann also keine anderen Zellen ändern?
11.06.2008 16:44:00
Tino
Hallo,
genau Funktionen können nur die eigene Zelle verändert, aber da du sowieso keine Rückgabe in Deiner Funktion hast kannst du es auch mit einer Sub machen.
Gruß Tino
www.tinomargit.com

Das ist nur die halbe Wahrheit,...
11.06.2008 17:00:58
Luc:-?
...Tino & Tobias!
Fktt (auch udF!) können (fast) nur den Wert der eigenen Zelle ändern. Für alles Andere, was mitunter von Fktt verlangt wird, kann man sie nur als Initiator (inkl Parameterübergabe) verwenden. Die eigentliche Arbeit muss dann eine auf ein passendes Ereignis wie bspw Worksheet_Change reagierende Ereignisprozedur bzw von dieser aufgerufene Subroutine (besser!) verrichten (hierzu gibt's auch im Herber-Archiv Material!).
Hier geht das aber sicher auch anders, d.h., die udF kann wohl entfallen... ;-)
Ansonsten könnte ja auch eine bedingte Formatierung auf die Nachbarzelle gesetzt wdn, die unter Formel ist die Formelzelle auswertet.
Gruß Luc :-?

Anzeige
AW: sag ich doch, mit sub owt.
11.06.2008 17:15:00
Tino

Ja, per bedingter Formatierung auf der...
11.06.2008 17:27:56
Luc:-?
...Nachbarzelle, Markus.
Wenn du aber alle Farben darstellen willst, ist eine VBA-Subroutine erforderlich. Dabei ist (vor xl12) wesentlich, ob du die Indexfarben der Zelle bzw eines Objektes oder ob du Echtfarben auf Grund ihrer (RGB-)Farbwerte und wie du diese dann darstellen willst: RGB-Reihe, dezimal, hexadezimal oder gar Namen wie Blau, Rot usw.
Wenn du Echtfarben willst, ist (vor xl12) zu beachten, dass Zellen nur die Indexfarben anzeigen können und die entsprechenden Objektfarben damit nicht immer übereinstimmen. Auch musst du dann evtl individuelle Farbpaletteneinstellungen berücksichtigen und letztlich wieder über den Index gehen, wenn du die Farbwahl nicht XL's Ähnlichkeitsalgorithmus überlassen willst (udFktt, die in Blattformeln stehen, verwenden automatisch die richtige Palette, in Prozeduren aufgerufene udFktt verwenden - quasi ohne Blattbezug! - stets die Standardpalette).
Bei Detailfragen einfach hier noch mal melden!
Gruß Luc :-?
Anzeige

127 Forumthreads zu ähnlichen Themen

Mit formel Anfang und ende bestimmen
Stephan

Hallo zusammen,
Wie kan ich mit einer formel den anfang und das ende Festlegen?
Ich habe eine Tabelle mit dem Datum vom 1.8.08-31.8.08, und möchte nur eine woche anzeigen, das heisst in einer zelle "A1" das anfangdatum (4.8.2008) in der "A2" das enddatum (10.8.2008) und "A3" die berec...
09.08.2008 09:19:13
Thread-ID: 1000462
14 Beiträge
Anzeige
In Zahlen umwandeln
fuxl

Ich hab ein AutoOpen Makro in dem ich die Funktion TextinSpalten verwende um den Zelleninhalt in eine Zahl umzuwandeln und die kleinen Dreiecke los zu werden. Das ganze geschieht mit folgender Zeile:
'Tabelle1.Range("H15:H$" & letzteZeile).TextToColumns Destination:=Tabelle1.Range("H15"...
19.11.2008 11:13:06
Thread-ID: 1025937
5 Beiträge
Text in Zahlen umwandeln
u_hoernchen

Ich habe eine Spalte in Excel, in der vereinzelt Zellen sind, in denen Zahlen als Text formatiert sind. Da ich diese Zahlen für die weitere Verwendung als Werte haben muss und ich das dann relativ oft umfrickeln muss (ist leider ein Download aus einem Vorprogramm), frage ich mich, ob es ggf. ei...
26.11.2008 11:09:00
Thread-ID: 1027963
4 Beiträge
Anzeige
Werte in Zahlen umwandeln
Jakob

Hallo,
ich habe Daten aus SAP in Excel importiert. Die Werte in der Spalte "AQ" werden als Text importiert. Deshalb habe ich diese Werte mit "1" multipliziert um die Spalte ins Zahlenformat umzuwandeln. Ich habe dafür den folgenden Code mit dem Macrorecorder aufgezeichnet.
Range("BB...
12.05.2009 10:28:57
Thread-ID: 1074517
12 Beiträge
Anzahl Zeilen(umbrüche) in einer Zelle ermitteln
Andreas

Hallo Excel-Profis
Ich hoffe ihr könnt mir bei folgenden Problem helfen:
Gibt es eine Formel mit deren Hilfe sich die Anzahl der Zeilen oder Zeilenumbrüche in einer Zelle (verbundenen Zelle) ermitteln lässt?
Ich bedanke mich im Voraus für alle Tipps und Lösungen
07.10.2009 14:55:35
Thread-ID: 1107846
3 Beiträge
verschiedene Farben in einer Zelle
Karstenk

Guten Abend,
ist es möglich, dass ich in einer Zelle die enthaltenen Zahl in verschiedenen Farben darstellen kann ?
Also : Die Vorkommazahl und die erste Zahl nach dem Komma sollen normal schwarz bleiben, und die weiteren Nachkommastellen sollen in Rot dargestellt werden.
Die Zahl i...
25.11.2009 22:17:10
Thread-ID: 1120120
4 Beiträge
Bei aktivierter OptionBox Farbe in einer Zelle
Christian

Guten Morgen
Und wieder mal wende ich mich an Euch.....
Ich möchte folgendes:
3 Kontrollkästchen (oder Optionbox)
Jedes hat den Bezug zu einer Zelle
Wenn kästchen 1 aktiv ist ist die dazugehörende Zelle grün
Bei Kästchen 2 = Orange
bei Kästchen 3 = Rot
Es sollte...
30.04.2010 09:25:16
Thread-ID: 1154646
3 Beiträge
Wenn-Formel in Verbindung mit Farbe
Michael Hölzl

Ich hab ein schon länger das Problem, daß ich das Ergebnis einer Wenn-Formel abhängig machen will, von der Farbe, welche in dieser Zelle hinterlegt sein soll.Beispiel: Wenn das Ergebnis einer Formel < 25 ist, dann, soll das Ergebnis mit grün hinterlegt sein, ansonsten soll das Ergebnis mit rot...
26.04.2002 10:40:17
Thread-ID: 116534
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
13
3
4
3
4
11
2
3
2
2
2
8
2
2
11
3
4
10
3
3
3
3
5
3
2