[Bullayer]

Gibt es eine Möglichkeit, die momentan aktive Zelle in Excel 2000 bzw. 2003 farbig hervorzuheben? Diese farbige "Markierung" soll bei Bewegung des Zellzeigers "mitwandern".

[Gast]

Hallo Bullayer

Schau dir mal das an, oder das hier.

[Bullayer]

@Gast: Du bist mein Held. Funktioniert einwandfrei. Danke schön.

[Bullayer]

Nachtrag: Verschiedene Zellen im Arbeitsblatt haben einen farbigen Hintergrund. Wie kann ich denn diesen Hintergrund beim Verlassen der Zelle wieder auf den ursprünglichen Wert stellen?

[sn00b]

die einzige möglichkeit wäre die farbe vorher in eine variable zu legen und beim verlassen der zelle die farbe wieder als hintergrund setzen. für den genauen code müßte ich mich auch erst schlau machen.

[Bullayer]

@Master.Max: Wo hinterlege ich denn den Code, derbeim Verlassen einer Zelle ausgeführt wird?

[sn00b]

halo, habe mir gerade den einen link von Gast nochmal angeschaut und dort ist die lösung. habe es getestet und bei mir funktioniert es problemlos. zu beachten ist nur das du beim formatieren der zellen den ganzen code deaktivierst da sie sich sonst nicht ändern.

Option Explicit

Dim rngVorher As Range
Dim colVorher As Integer

Private Sub Worksheet_Deactivate()
If Not rngVorher Is Nothing Then rngVorher.Interior.ColorIndex = colVorher
Set rngVorher = Nothing
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Not rngVorher Is Nothing Then rngVorher.Interior.ColorIndex = colVorher
colVorher = Target.Interior.ColorIndex
Target.Interior.ColorIndex = 6  'Hintergrund Gelb
Set rngVorher = Target
End Sub

zum deaktivieren setzt du dann einfach vor jede zeile ein '

[Bullayer]

Ich hatte wohl Tomaten auf den Augen. Danke dir.