Aktive Zeile umrahmen

Forumthread: Aktive Zeile umrahmen
1 Beitrag zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Aktive Zeile umrahmen

04.05.2005 23:43:33

Stefan

Hallo Excel-Spezis,
könnt Ihr mir bitte behilflich sein ?
Ich habe eine große Tabelle. Um diese etwas
übersichtilicher zu gestalten, möchte ich gern,
daß die aktive Zeile fett umrahmt ist.
Habt Ihr da eine Idee. In der Recherche finde
ich nur etwas über farbliche markierungen.
Lieben Dank und Gruß
Stefan

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Aktive Zeile umrahmen

05.05.2005 00:12:49

Peter

AW: Aktive Zeile umrahmen

05.05.2005 00:12:49

Peter

Servus,
einfach mal den Makrorecoder anschmeisen ;)
Mit Alt F11 in VBA Editor wechseln , Tabelle wo es passieren soll doppelclicken, code einfügen.


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Select
With Selection.Borders(xlEdgeLeft)
.LineStyle = xlContinuous
.Weight = xlMedium
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeTop)
.LineStyle = xlContinuous
.Weight = xlMedium
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlMedium
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeRight)
.LineStyle = xlContinuous
.Weight = xlMedium
.ColorIndex = xlAutomatic
End With
End Sub

MfG
Peter