Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
728to732
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
728to732
728to732
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellen Hintergrund

Zellen Hintergrund
05.02.2006 02:10:49
Jede029
Hallo
Ich komme mit der Recherche nicht weiter und bitte Euch um rat.
In zelle B1 wird entweder "ALSi 7 MG" oder "ALSi 9 MG" oder "ALSi 11 MG" oder "ALSi 11 Dv" angezeigt.
nun soll sich die hintergrundfarbe je nach legierung in Zelle A1 ändern.
für "ALSi 7 MG" grün
für "ALSi 9 MG" blau
für "ALSi 11 MG" gelb
für "ALSi 11 Dv" orange
Bitte um hilfe
Danke
Jens

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

Betreff
Datum
Anwender
Anzeige
AW: Zellen Hintergrund
05.02.2006 06:53:26
Walter
GUTEN MORGEN JENS,
Mit bedngter Formatierung kannst Du drei Farben schaffen,
Zellwert ist gleich ALSi 7 MG Muster Grün usw..
Gruß
Rentner Walter
aus dem nördlichen Nordhessen
Bitte um Antwort, es würde mich sehr freuen!
AW: Zellen Hintergrund
05.02.2006 09:12:03
Ramses
Hallo
wenn der Wert manuell eingetragen wird dann geht folgendes
Option Explicit


Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address(0, 0) <> "B1" Then Exit Sub
    Select Case Target.Text
        Case "ALSi 7 MG"
            'grün
            Target.Interior.ColorIndex = 4
        Case "ALSi 9 MG"
            'Blau
            Target.Interior.ColorIndex = 5
        Case "ALSi 11 MG"
            'Gelb
            Target.Interior.ColorIndex = 6
        Case "ALSi 11 Dv"
            'Orange
            Target.Interior.ColorIndex = 46
        Case Else
            Target.Interior.ColorIndex = xlNone
    End Select
End Sub

Der Code muss in das Klassenmodul der TAbelle wo das funktionieren soll
Rechte Maustaste auf Tabellenreiter
Code anzeigen
Dort den oben beschriebenen Code reinkopieren
Danach kann der Zellinhalt manuell, oder über eine Listenauswahl, geändert werden.
Gruss Rainer
Anzeige
AW: Zellen Hintergrund
05.02.2006 11:41:08
ransi
hallo walter
wenn nur die eingetagen werden sollen gehts auch mit der bidingten formatierung.
stell A1 auf grün und dann so:
AW: Zellen Hintergrund
06.02.2006 09:09:55
Jede029
Hallo
Danke für die Antworten- aber leider funktioniert das nicht so richtig.
ich habe mal meine Datei hochgeladen vieleicht kann man damit mehr anfangen.
Danke Jens

Die Datei https://www.herber.de/bbs/user/30703.xls wurde aus Datenschutzgründen gelöscht

AW: Zellen Hintergrund
07.02.2006 22:02:52
Jede029
Ich bedanke mich
gruß jens
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige