Angeklickte Spalte Schrift + Farbe ändern

[hbboy15]

Hallo zusammen,

ich mal wieder :D.
Ich würde gerne noch eine optische Sache einbauen in meiner Tabelle.
Ich habe Spalten von A - I weiße hintergrundfarbe und schwarze schift, ich würde gerne wenn ich eine Zelle anklicke die jeweilige Zeile mit blauem hintergrund haben und weißer schrift und sobald ich auf einer drunter liegenden Spalte klicke soll diese Blau und weiße schrift haben und die davor gefärbte Zeile soll wieder in den Urzustand zurückgesetzt werden.
Zeilen 8 -200 und Spalten A-I dort soll dies Möglich gemacht werden.

Ist dies programmierbar in VBA ?

Vielen Dank :)

[Glausius]

Ja, das ist mit VBA programmierbar!
Dazu dient die Routine Worksheet_SelectionChange -sieh die dir in der VBA-Hilfe näher an.

[RPP63]

Moin!
Ins Modul der Tabelle:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target
   Call Reset
   If .CountLarge > 1 Or Intersect(Target, Range("A8:I200")) Is Nothing Then Exit Sub
   With Me.Range(Cells(.Row, 1), Cells(.Row, 9))
      .Interior.Color = vbBlue
      .Font.Color = vbWhite
   End With
End With
End Sub

Sub Reset()
   With Me.Range("A8:I200")
      .Interior.Pattern = xlNone
      .Font.ColorIndex = xlAutomatic
   End With
End Sub

Gruß Ralf

[hbboy15]

klappt wunderbar vielen Dank, jedoch ergibt sich hier ein Problem.
Ich habe neben der Zeile Checkboxen wenn ich die anglicken wird die selbe Zeile auch gelb makiert, wenn ich mit dem cursor wieder wegklicke verschwindet auch das davorherige Gelb, kann man dies so machen, nachdem man auf eine andere Zeile klickt kommt der Urzustand wieder zurück (Das gelb makierte, nicht das sich die komplette Zeile weiß gemacht wird.)

[hbboy15]

klappt wunderbar vielen Dank, jedoch ergibt sich hier ein Problem.
Ich habe neben der Zeile Checkboxen wenn ich die anglicken wird die selbe Zeile auch gelb makiert, wenn ich mit dem cursor wieder wegklicke verschwindet auch das davorherige Gelb, kann man dies so machen, nachdem man auf eine andere Zeile klickt kommt der Urzustand wieder zurück (Das gelb makierte, nicht das sich die komplette Zeile weiß gemacht wird.)

Vielleicht das der blaue "Cursor" nur oberflächlich liegt, aber keine wirklichen Einfluss auf die Zellveränderung hat.

[RPP63]

Bin im Zug, deshalb nur kurz:
Suche mal nach Fadenkreuz.
Da gibt es auch Lösungen mit Rechtecken.
Morgen lade ich mal ein Beispiel hoch.

Gruß Ralf

[hbboy15]

Bin im Zug, deshalb nur kurz:
Suche mal nach Fadenkreuz.
Da gibt es auch Lösungen mit Rechtecken.
Morgen lade ich mal ein Beispiel hoch.

Gruß Ralf

Vielen Dank ?Ich freue mich auf die Beispieldatei?

[RPP63]

Moin!
Fast vergessen! 
Drei Möglichkeiten:

1. Mittels Shapes (Rechtecke)
   
2. Mittels Bordmitteln (per Selection)
   
3. Mittels bedingter Formatierung iVm dynamischen Namen
   

Erklärungen zur Erstellung in der Datei.

Gruß Ralf

[hbboy15]

Vielen Dank :), bekommt man das nicht hin, dass nur der Horizontale bereich makiert wird nicht der vertikale ?

[hbboy15]

habs hinbekommen danke dir :)