Zelle XY einfärben wenn Cursor in gleicher Zeile

29/01/2009 - 12:57 von stego | Report spam
Hallo,

hab nun schon mehrer Beitràge durchforstet und auch in anderen Foren, aber
noch
nicht genau das gefunden was ich brauche.

In dem Moment wo ich irgendwo hinklicke soll in dieser Zeile die Zelle Ax
farblich hervorgehoben werden.

Wie funktioniert das genau?

Danke
Stephan
 

Lesen sie die antworten

#1 Andreas Reithmayr
29/01/2009 - 13:56 | Warnen spam
Hallo Stefan,

Im modul hinter dem Sheet schreibst Du folgende Prozedur:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

'Hintergrundfarbe in der gesamten Spalte A erst mal zurücksetzten
Cells(1, 1).EntireColumn.Interior.ColorIndex = xlNone

'Jetzt die Spalte A der "angeklickten" Zeile rot einfàrben
Cells(Target.Row, 1).Interior.ColorIndex = 3

End Sub

Grüße,
Andreas



"stego" wrote:

Hallo,

hab nun schon mehrer Beitràge durchforstet und auch in anderen Foren, aber
noch
nicht genau das gefunden was ich brauche.

In dem Moment wo ich irgendwo hinklicke soll in dieser Zeile die Zelle Ax
farblich hervorgehoben werden.

Wie funktioniert das genau?

Danke
Stephan

Ähnliche fragen