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
336to340
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
336to340
336to340
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Farben bzw. Bedingte Formatierung

Farben bzw. Bedingte Formatierung
12.11.2003 15:38:17
Thorsten Buchwald
Guten Tag,
ich habe folgendes Problem:

Ich muss in einer Planungstabelle 7 Mitarbeitern
7 verschiedene Farben zuordnen, damit der Mitarbeiter
in einer beliebigen Zelle nur noch den Anfangsbuchstaben
seines Nachnames (z.B. "h" für heinz) eingibt und dann
dieser Buchstabe mit dem dazu farblich passenden Hintergrund
erscheint.

Über Bedingte Formatierung erziele ich den gewünschten Effekt,
allerdings nur für 3 Mitarbeiter.

Wer kann mir helfen?

Gruß
Thorsten

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Farben bzw. Bedingte Formatierung
12.11.2003 16:00:04
PeterW
Hallo Thorsten,

mehr als 3 Bedingungen geht nur mit VBA. Falls das prinzipiell möglich ist müsste man den Bereich kennen, in dem die Buchstaben eingegeben werden.

Gruß
Peter
AW: Farben bzw. Bedingte Formatierung
12.11.2003 16:06:06
Thorsten Buchwald
Hallo! Der Bereich ist ziemlich groß, da es sich hier um einen Datumskalender
bis Mitte 2004 handelt, wo in jeder Zeile bestimmt hunderte von Spalten berücksichtigt werden müssten. Die Zeilen können einfacher begrenzt werden (ca. 7 - 8 Zeilen immer).
Wie würde denn so ein VBA-Script aussehen?
AW: Farben bzw. Bedingte Formatierung
12.11.2003 17:05:58
PeterW
Hallo Thorsten,

das könnte so aussehen:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
'bei Änderung in den Zeilen 4 bis 11
If Target.Row > 3 And Target.Row < 12 And Target.Cells.Count = 1 Then
'in Abhängigkeit vom Eingabewert färben
Select Case Target
Case Is = "h"
Target.Interior.ColorIndex = 3
Case Is = "b"
Target.Interior.ColorIndex = 4
Case Is = "d"
Target.Interior.ColorIndex = 5
Case Is = "g"
Target.Interior.ColorIndex = 6
Case Is = "n"
Target.Interior.ColorIndex = 7
Case Is = "p"
Target.Interior.ColorIndex = 8
Case Is = "o"
Target.Interior.ColorIndex = 19
End Select
End If
End Sub

Die Buchstaben musst du natürlich anpassen. Der Code gehört in das Modul der Tabelle (Rechtsklick auf das Tabellenregister - Code anzeigen - in das freie Fenster kopieren).

Gruß
Peter
Anzeige
AW: Farben bzw. Bedingte Formatierung
13.11.2003 08:00:09
Thorsten B.
Danke für den Tip, das könnte klappen.

Wie aber erweitere ich den Bereich der Zeilen (Du hast nur 4 bis 11 angegeben, ich benötige aber 5 - 43)?

Gibt es auch eine möglichkeit, dass wenn der Benutzer die Zellen wieder löscht
auch die Hintergrundfarbe automatisch wieder auf weiss zu setzen?

Bitte um weitere Infos.

Vielen Dank!

Gruß
Thorsten B.
AW: Farben bzw. Bedingte Formatierung
13.11.2003 14:22:10
PeterW
Hallo Thorsten,

hier die Erweiterung auf die Zeilen 5 bis 43. Beim Löschen einzelner Eingaben wird die Zelle wieder entfärbt.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
'bei Änderung in den Zeilen 5 bis 43
If Target.Row > 4 And Target.Row < 44 And Target.Cells.Count = 1 Then
'in Abhängigkeit vom Eingabewert färben
Select Case Target
Case Is = "h"
Target.Interior.ColorIndex = 3
Case Is = "b"
Target.Interior.ColorIndex = 4
Case Is = "d"
Target.Interior.ColorIndex = 5
Case Is = "g"
Target.Interior.ColorIndex = 6
Case Is = "n"
Target.Interior.ColorIndex = 7
Case Is = "p"
Target.Interior.ColorIndex = 8
Case Is = "o"
Target.Interior.ColorIndex = 19
Case Is = ""
Target.Interior.ColorIndex = xlNone
End Select
End If
End Sub

Gruß
Peter
Anzeige

311 Forumthreads zu ähnlichen Themen

Zahlen aus Zelle auslesen
Timo

Hallo liebes Forum,
gibt es eine Möglichkeit aus einer Zelle nur die Zahlen auszulesen, siehe Beispiel:
'123456 BLA --> 123456
Ist eine Excel-interne (keine VBA-Programmierung) hier möglich?
Vielen Dank für die Unterstützung!
Timo
14.08.2008 11:16:00
Thread-ID: 1001770
7 Beiträge
Anzeige
über Farbe der Zelle Zellen dynamisch sperren
Sucher

Hallo liebes Forum,
kann mir hier im Forum eine/einer weiterhelfen.
Das Makro soll wenn Colerindex = 2 Zellen dynamisch entsperren alle anderen Zell- Farben sollen gesperrt werden!
Ist Situation:
Ich habe mit Excel einen Rechner gebastelt der von anderen Anwendern benutzt werde...
11.12.2008 09:18:42
Thread-ID: 1031921
13 Beiträge
Hintergrundfarbe auf Grund Wert in anderer Zelle
Roger

Guten Morgen,
ich suche eine Lösung für folgendes Problem: In der Spalte F von Zeile 4 bis 300 habe ich folgende werte stehen: entweder nichts, Ja oder Nein. Nun will ich zwecks übersicht in Spalte A in den Zellen 4 bis 300 Farben als Hintergurnd haben. Wenn in Zelle F4 nichts steht, dann i...
18.12.2008 08:21:58
Thread-ID: 1033737
10 Beiträge
Anzeige
MIN-Wert von bestimmten Zellen auslesen
bestimmten

Hallo zusammen,
ich habe folgendes Problem, welches sich erstmal gar nicht schwierig anhört, nur bei der Umsetzung hapert es noch ein bißchen.
Ich habe in meiner Excel Tabelle bspw... folgendes stehen
Zeile 12: I12=test, J12=4
Zeile 14: C14=test, D14=3, H14=test, I14=6
Zeile...
14.01.2009 11:17:03
Thread-ID: 1039535
10 Beiträge
Diagramm Linienfarbe aus Zellfarbe "auslesen"
StefanK

Hallo Herber-Excel-Freunde,
ich habe ein Diagramm (Punkt XY - Untertyp: Punkte mit Linien ohne Datenpunkte) rstellt.
Dabei formatiert Excel erst einmal die Farben automatisch.
Bislang markiere ich dann die einzelnen Linien im Diagramm und formatiere die Farben um.
Jetzt meine A...
16.02.2009 19:50:00
Thread-ID: 1051268
11 Beiträge
Zahl aus best. Zelle auslesen
klaus

Hallo!
Folgende Tabelle soll dargestellt werden:
Tabelle1

 AB1Spalte 1nur 90 (für Anzahl Werte >2 und 210019,12,15,70,70,8,90,9013100160410009,10016,10019,10021,12,16,19,2,24,70,77,8,9,9015 0610009,77,99,88,10019,10021,12,16,19,2,24,70,77,8,9,900

Excel Tabel...
02.03.2009 15:51:14
Thread-ID: 1055623
6 Beiträge
Farbe von bedingte Formatierung übertragen
bedingte

Hallo,
Wie kann ich die Farbe von bedingte Formatierung von ZellBereich 2 übertagen nach ZellBereich 1
Hintergrund ist dass in Bereich 2 Prozentuelle anteilige Wert je Warengruppe (WGR) ausgerechnet wird.
Ich suche ein möglichkeit diese Farbe eins zu eins von Bereich 2 nach Bereic...
05.03.2009 12:14:23
Thread-ID: 1056767
3 Beiträge
Datum aus Zelle auslesen im Dateinamen übernehmen
Ralf

Hallo Zusammen,
hab' ein kleines Problem:
Wie kann man ein in einer Zelle hinterlegtes Datum im Dateinamen übernehmen.
Gruß Ralf
13.03.2009 16:49:57
Thread-ID: 1059943
4 Beiträge

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
6
10
12
9
7
9
10
5
2
3
5
2
3
2
6
3
17
14
2
3
2
3
7
3
2