Bedingte Formatierung

[Ratlos_]

Guten Morgen!

Ich möchte gerne eine Zeile einfärben, wenn jeweilige Zelle in Spalte B Teil einer Formel einer anderen Zelle ist.

Beispiel: 
A1=SUMME(B3:B8)
-> Zeilen 3 bis 8 sollen grün werden

Ist das mit Excel irgendwie möglich? 

Danke schonmal!

[chris-ka]

Hallo Ratlos_
über bedingte Formatierung wäre mir keine Lösung bekannt!

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim rng As Range
    'Cells.Interior.Color = xlNone
    If Target.HasFormula Then
        Set rng = Target.DirectPrecedents
        If Not rng Is Nothing Then
            rng.Interior.Color = vbGreen
        End If
    End If
End Sub

Dieser Code wär dann im jeweiligen Tabellenblatt hinterlegt.
Nur wozu?

Es gibt einen Standard dafür.

1. gewünschte Zelle mit der Formel markieren
   
2. Register -> Formel
   
3. Schaltfläche-> Spur zum Vorgänger
   

[UweD]

Hallo

geht, aber mit Megaformel

- Spalte B2: B100 markieren
- Bedingte Formatierung
- Formel zur...

Code:

=(ZEILE()>=ZEILE(INDIREKT(WECHSELN(LINKS(FORMELTEXT($A$1);FINDEN(":";FORMELTEXT($A$1))-1);"=SUMME(";""))))*(ZEILE()<=ZEILE(INDIREKT(WECHSELN(TEIL(FORMELTEXT($A$1);FINDEN(":";FORMELTEXT($A$1))+1;99);")";""))))

- Formatierung Zelle Gelb
- OK, Ok

LG UweD

[{Boris}]

Hi Uwe,

das geht aber in mehreren Fällen in die Hose, z.B.:

A1: =B2+B3+B4
A1: =SUMME(B3:B5;B9:B11)

Das Parsen nach Vorgängern / Nachfolgern ist nicht wirklich trivial.