Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
528to532
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
528to532
528to532
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Bedingt. Formatierung dynamisch in jeder Zeile

Bedingt. Formatierung dynamisch in jeder Zeile
05.12.2004 22:04:51
Johannes
Hallo xlGemeinde,
ich moechte gerne eine Art der bedingten Formatierung via VBA auf jede Zeile im Sheet anwenden. Diese bedingte Formatierung soll abhaengig vom Wert sein, der sich in Spalte der jeweiligen Zeile befindet. Es ist etwas schwer zu umschreiben - aber hab das nochmal in nem Beispiel verdeutlicht. Wenn der Wert 'test' in der Spalte A auftritt, sollen jeweils Spalte A-F der jeweiligen Reihe gelb hinterlegt werden.
https://www.herber.de/bbs/user/14365.xls
Vielen Dank schonmal vorab.
Gruesse,
Johannes D.

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bedingt. Formatierung dynamisch in jeder Zeile
05.12.2004 22:11:05
Josef
Hallo Johannes!
Kopiere diesen Code in das Modul der Tabelle.
(Rechtsklick auf Blattregister &gt Code anzeigen &gt ins rechte Fenster)

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 1 Then Exit Sub
If Target = "test" Then
Range(Cells(Target.Row, 1), Cells(Target.Row, 6)).Interior.ColorIndex = 6
Else
Range(Cells(Target.Row, 1), Cells(Target.Row, 6)).Interior.ColorIndex = xlNone
End If
End Sub

Code eingefügt mit: Excel Code Jeanie
Gruß Sepp
Anzeige
AW: Bedingt. Formatierung dynamisch in jeder Zeile
Ramses
Hallo
VBA ist viel zu langsam.
Nimm die bedingte formatierung
Ziel
 ABCDEFG
1Wert 1Wert 2Wert 3Wert 4Wert 5Wert 6 
21      
32      
43      
54      
65      
7Test      
87      
98      
109      
110      
12       
13       
Bedingte Formatierungen der Tabelle
ZelleNr.: / BedingungFormat
A21. / Formel ist =$A2="Test"Abc
B21. / Formel ist =$A2="Test"Abc
C21. / Formel ist =$A2="Test"Abc
D21. / Formel ist =$A2="Test"Abc
E21. / Formel ist =$A2="Test"Abc
F21. / Formel ist =$A2="Test"Abc
A31. / Formel ist =$A3="Test"Abc
B31. / Formel ist =$A3="Test"Abc
C31. / Formel ist =$A3="Test"Abc
D31. / Formel ist =$A3="Test"Abc
E31. / Formel ist =$A3="Test"Abc
F31. / Formel ist =$A3="Test"Abc
A41. / Formel ist =$A4="Test"Abc
B41. / Formel ist =$A4="Test"Abc
C41. / Formel ist =$A4="Test"Abc
D41. / Formel ist =$A4="Test"Abc
E41. / Formel ist =$A4="Test"Abc
F41. / Formel ist =$A4="Test"Abc
A51. / Formel ist =$A5="Test"Abc
B51. / Formel ist =$A5="Test"Abc
C51. / Formel ist =$A5="Test"Abc
D51. / Formel ist =$A5="Test"Abc
E51. / Formel ist =$A5="Test"Abc
F51. / Formel ist =$A5="Test"Abc
A61. / Formel ist =$A6="Test"Abc
B61. / Formel ist =$A6="Test"Abc
C61. / Formel ist =$A6="Test"Abc
D61. / Formel ist =$A6="Test"Abc
E61. / Formel ist =$A6="Test"Abc
F61. / Formel ist =$A6="Test"Abc
A71. / Formel ist =$A7="Test"Abc
B71. / Formel ist =$A7="Test"Abc
C71. / Formel ist =$A7="Test"Abc
D71. / Formel ist =$A7="Test"Abc
E71. / Formel ist =$A7="Test"Abc
F71. / Formel ist =$A7="Test"Abc
A81. / Formel ist =$A8="Test"Abc
B81. / Formel ist =$A8="Test"Abc
C81. / Formel ist =$A8="Test"Abc
D81. / Formel ist =$A8="Test"Abc
E81. / Formel ist =$A8="Test"Abc
F81. / Formel ist =$A8="Test"Abc
A91. / Formel ist =$A9="Test"Abc
B91. / Formel ist =$A9="Test"Abc
C91. / Formel ist =$A9="Test"Abc
D91. / Formel ist =$A9="Test"Abc
E91. / Formel ist =$A9="Test"Abc
F91. / Formel ist =$A9="Test"Abc
A101. / Formel ist =$A10="Test"Abc
B101. / Formel ist =$A10="Test"Abc
C101. / Formel ist =$A10="Test"Abc
D101. / Formel ist =$A10="Test"Abc
E101. / Formel ist =$A10="Test"Abc
F101. / Formel ist =$A10="Test"Abc
A111. / Formel ist =$A11="Test"Abc
B111. / Formel ist =$A11="Test"Abc
C111. / Formel ist =$A11="Test"Abc
D111. / Formel ist =$A11="Test"Abc
E111. / Formel ist =$A11="Test"Abc
F111. / Formel ist =$A11="Test"Abc
 
Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download  
Schreib in A2 die Bedingte Formatierung
=Formel = =$A2="Test"
Achtung auf das $-Zeichen !!
Danach kannst du mit dem Formatpinsel die Formatierung auf alle Zellen deines Bereiches übertragen, oder du markierst deinen gesamten Bereich ab A2 und rufst dann die Bedingte Formatierung auf.
Wenn du das Format dann eingibst, wird es auf alle markierten Zellen gleichzeitig übertragen.
Gruss Rainer
Anzeige
Dazu noch eine Frage...
Johannes
Hallo Rainer und Josef,
vielen Dank fuer eure prompten Anworten. Ihr seid ja schnell, als die Feuerwehr. ;-) Den VBA Code kann ich leider nicht gebrauchen, da die Bedingungen mit Gueltigkeiten hinterlegt sind und somit nicht immer prompt die Formatierung ausgeloest wird, leider. Deswegen moechte ich gerne die Loesung von Rainer ausprobieren aber steh im Moment ziemlich auf dem Schlauch, wie ich das umsetzen soll.
Nehmt mir das nicht krumm - aber ich steig grad einfach nicht durch.
Gruesse,
Johannes D.
AW: Dazu noch eine Frage...
Ramses
Hallo
hier die Kurzform
A2 - Ende deines Bereiches markieren
Markierung NICHT aufheben !!!!
Format - Bedingte Formatierung
und die Formel eingeben
Ziel
 AB
1Wert 1Wert 2
24 
35 
4Test 
57 
6  
7  
Bedingte Formatierungen der Tabelle
ZelleNr.: / BedingungFormat
A21. / Formel ist =$A2="Test"Abc
B21. / Formel ist =$A2="Test"Abc
A31. / Formel ist =$A3="Test"Abc
B31. / Formel ist =$A3="Test"Abc
A41. / Formel ist =$A4="Test"Abc
B41. / Formel ist =$A4="Test"Abc
A51. / Formel ist =$A5="Test"Abc
B51. / Formel ist =$A5="Test"Abc
 
Excel Tabellen einfach im Web darstellen    Excel Jeanie HTML  3.0    Download  
Ist es jetzt klarer ?
Gruss Rainer
Anzeige
Klar schon, aber...
05.12.2004 22:42:34
Johannes
ist mir langsam schon etwas peinlich.
Ich hab doch bei der bedingten Formatierung ueber den Assistenten nur 3 Moeglichkeiten eine bedingte Formatierung zu erstellen, wobei ich bei deiner Kurzform schon 8 Moeglichkeiten braeuchte? Oder sehe ich eben den Wald vor lauter Baeumen nicht?
Dazu braeuchte ich die bedingt. Formatierung fuer jede Zeile. Heisst es koennen ja durchaus auch schonmal 1000 Datensaetze in dieser Tabelle stehen.
Hm...
Johannes D.
AW: Klar schon, aber...
Ramses
Hallo
du musst das
=$A2="Test"
nur EINMAL eingeben.
Im obigen Beispiel wird die Bedingte Formatierung für alle dargestellten Zellen angegeben.
Siehe linke Spalte "Zelle". Hier steht auf welche Zelle sich die Formel der Bedingten Formatierung bezieht !!
Gruss Rainer
Anzeige
Super - vielen Dank!
05.12.2004 22:50:55
Johannes
Auch ich habs jetzt endlich verstanden - Danke! :-)

233 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige