Office: (Office 365) Zeile per Klick farblich machen auch für weitere Tabellenblätter möglich?

Hallo.

Ich habe mehrere Tabellenblätter.

Das 1. Blatt ist Bedingt formatiert mit: =ZEILE()=ZELLE("Zeile")
dazu die Farbe grün
und dem VBA Code: Target.Calculate

(Datei ist im Anhang)

Wenn ich nun in irgend eine Zeile klicke, färbt sich diese zur besseren Übersicht komplett grün.

Ich bin aber nicht in der Lage, das ebenfalls bei den anderen Tabellenblättern hinzubekommen.

Kann mir da jemand helfen?

Vielen Dank

 

Hi Jens,

du musst die Bedingte Formatierung für den Bereich in jedem Tabellenblatt erstellen. Außerdem dann folgenden Code ins Codemodul DieseArbeitsmappe:

Code:

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    Target.Calculate
End Sub

Dadurch wird er in jedem Tabellenblatt ausgeführt.

---

 

@Beverly Guten Morgen :)

Vielen Dank.

Alles klar soweit, habe ich ja auch gemacht, ABER wie kann ich es denn in das Codemodul DieseArbeitsmappe einpflegen?

Egal, was ich mache, da steht immer nur: Tabelle1

Und in Tabelle 1 funktioniert es super, aber in den anderen nicht.

Das wird genau der Punkt sein, wo ich nicht weiterkomme.

Hast Du eine Idee wo mein Fehler liegt?

 

@Beverly ICH HABS :) :) :)

VIELEN LIEBEN DANK!!!!!!!!!!