Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1972to1976
1972to1976
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelle grün oder rot

Forumthread: Zelle grün oder rot

Zelle grün oder rot
17.04.2024 09:32:31
wilma
Guten Morgen,
ich möchte gern in einer Spalte z.B. von T5:T50, wenn man da eine Zelle auswählt, das diese Hell-Rot wird.
Wenn man die Spalte verlässt soll nichts gemacht werden.

gr wilma
Anzeige

13
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelle grün oder rot
17.04.2024 09:39:48
{Boris}
Hi,

Dein Betreff (grün/rot) passt nicht ganz zur Frage, da dort von grün keine Rede ist.
Hier mal ein Beispiel für hellrot.

Code kommt in das Modul der entsprechenden Tabelle. 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Intersect(Target(1), Range("T5:T50")) Is Nothing Then

    Range("T5:T50").Interior.ColorIndex = xlNone

    Target(1).Interior.Color = 7700479

End If

End Sub


VG, Boris
Anzeige
AW: Zelle grün oder rot
17.04.2024 09:46:43
MCO
Moin, Wilma!

Kopier das in das Tabellenmodul deines Arbeitsblattes: 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)



    'Cells.Interior.ColorIndex = xlNone einblenden, wenn doch nicht nix gemacht werden soll...

    Set bereich = Application.Intersect(Range("T5:T50"), Target)

    If Not bereich Is Nothing Then Target.Interior.ColorIndex = 22

End Sub

Gruß,MCO
Anzeige
Supi, kleine Erweiterung ?
17.04.2024 09:49:16
wilma
Guten Morgen zusammen,
wenn ich irgendeine andere Zelle im Blatt anklicke (außer T-Bereich) soll Farbe entfernt werden.

gr wilma
Hallo Onur wie geht das ?
17.04.2024 10:29:52
wilma
Hallo ONUR,
wie funktioniert das, bei deiner Mustertabelle ?
Wenn ich z.B. die Spalte ändern möchte ?
Bedinge Formatierung ist es nicht.

gr wilma
Anzeige
AW: Hallo Onur wie geht das ?
17.04.2024 10:35:05
Onur
Doch, genau DAS ist es, bzw eine Kombination aus VBA und bedForm.
Der Code ist nur da, weil die ZELLE-Funktion nicht volatil ist. Deswegen wird irgend eine Berechnung bei SelectionChange durchgeführt, damit sich die ZELLE-Funktion aktualisiert.
Das sind für mich böhmische Dörfer
17.04.2024 10:40:43
wilma
Hallo ONUR,
und wie kann ich jetzt auf Spalte D von D3-D40 oder
auf Spalte B von B10-B20 ändern ?

gr wilma
Anzeige
AW: Das sind für mich böhmische Dörfer
17.04.2024 10:41:43
Onur
Einfach nur den Gültigkeitsbereich der bedingten Formatierung ändern.
Aber in deiner Tabelle ist doch nichts...
17.04.2024 10:54:28
wilma
Hallo,
aber in deiner Mustertabelle ist doch nicht in bedingter Formatierung eingetragen !

gr wilma
Ist DOCH, Entschuldigung, danke gr wilma --))
17.04.2024 10:56:40
wilma
Anzeige
Gerne !
17.04.2024 11:29:37
Onur
AW: Aber in deiner Tabelle ist doch nichts...
17.04.2024 10:57:08
Onur
WO guckst DU denn?
Userbild
Herzlichen Dank Boris. -)
17.04.2024 09:45:33
wilma
Anzeige
;

Beliebteste Forumthreads (12 Monate)

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