Bedingte Formatierung Excel

[OFJ]

Hallo Leute,

ich steh irgendwie gerade auf dem Schlauch. Ich möchte in Excel (Office 365) eine bedingte Formatierung durchführen bei der festgelegt wird, dass wenn in einer Zelle ein bestimmter Eintrag erfolgt, die ganze Zeile farblich markiert wird.

Ich bekomme es aber nur hin, dass die Zelle, in der dieser Wert steht, entsprechend markiert wird.

 

[gerli09]

Du musst dann wahrscheinlich alle betroffenen Zellen in der Zeile mit der gleichen bedingten Formatierung versehen. Wenn du dabei den Zellbezug als absolut formatierst (z.B. „$B$3“) brauchst du die Zelle nur rüberziehen oder mit Format übertragen machen.

 

[OFJ]

Ich finde schon keinen Weg, wie ich eine Zelle in Abhängigkeit des Inhaltes einer anderen Zelle formatieren kann.

 

[gerli09]

Ich habe hier mal als Beispiel: Wenn der Wert in C5 > 5 ist, werden die Zellen C5 bis J5 hellrot gefüllt.

 

[OFJ]

Irgendwas mach ich falsch. Bei mir sieht es so aus:

 

[gerli09]

Du musst mit der Funktion „Formel“ arbeiten, sonst kannst du den Bezug auf eine feste Zelle nicht definieren.

 

[BadBoy68]

@OFJ

hat sich ja nicht mehr gemeldet! Also wird es wohl funktioniert haben. Sonst vielleicht noch ein Lösungsansatz über VBA:

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Cells(Target.Row, 1).Value = "Test" Then ´Wenn in der Spalte A Test steht
Target.EntireRow.Interior.Color = vbRed ´Zeile wird rot
Else
Target.EntireRow.Interior.ColorIndex = xlNone
End If
End Sub

​

 

[orcymmot]

Geht denn VBA überhaupt mittlerweile auf Mac Office?

 

[BadBoy68]

@orcymmot

sollte kein Problem sein!
Also 2019/2021 und damit vermutlich auch das Office 365 erst Recht.

Aber Du kannst es einfach ausprobieren.
Extras/Makro/Visual-Basic-Editor

 

[BadBoy68]

Hallo,

ich habe mir gerade das Beispiel etwas genauer angeschaut!
Ich denke, dass sollte dann so passen:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 And Target.Column = 5 Then
If Target.Value = "Ja" Then
Range(Cells(Target.Row, 1), Cells(Target.Row, 5)).Interior.ColorIndex = 3 ´rot bei Ja in Spalte E
Else
If Target.Value = "Nein" Then
Range(Cells(Target.Row, 1), Cells(Target.Row, 5)).Interior.ColorIndex = 14 ´grün bei Nein in Spalte E
Else
Range(Cells(Target.Row, 1), Cells(Target.Row, 5)).Interior.ColorIndex = xlNone ´leer Löschung
End If
End If
End If
End Sub

 

[fa66]

Geht denn VBA überhaupt mittlerweile auf Mac Office?

Seit wann bist du raus?
Nur MSO2004 hatte VB(A) nicht unterstützt.

Ab MSO2008 ist MSO gleich wieder VB(A) und zusätzlich auch automatorfähig.
In MSO2011 unterstützt nur Outlook nicht VB(A) – MS hatte dummerweise auf Apples systemweite SyncServices gesetzt, die ausgerechnet während der Einführung von MSO2011 von Apple wieder aufgekündigt wurden. (Wie es um Add-ins in Outlook:mac in jüngeren Versionen aussieht, habe ich nicht weiter verfolgt.)