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 :)
Ja, das ist mit VBA programmierbar!
Dazu dient die Routine Worksheet_SelectionChange -sieh die dir in der VBA-Hilfe näher an.
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
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.)
(23.01.2017, 14:50)hbboy15 schrieb: [ -> ]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.
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
(23.01.2017, 20:58)RPP63 schrieb: [ -> ]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?
Moin!
Fast vergessen!
Drei Möglichkeiten:
- Mittels Shapes (Rechtecke)
- Mittels Bordmitteln (per Selection)
- Mittels bedingter Formatierung iVm dynamischen Namen
Erklärungen zur Erstellung in der Datei.
Gruß Ralf
Vielen Dank :), bekommt man das nicht hin, dass nur der Horizontale bereich makiert wird nicht der vertikale ?
habs hinbekommen danke dir :)