Trennzeilen formatieren

[Wolfgang1802]

Guten Abend,

in einer Tabelle habe ich in einer Spalte einen Schlüsselwert, etwa den Wochentag, mit jeweils unterschiedlich viel Zeilen bis der  Schlüsselwert wechselt. 
Jedesmal, wenn der Wert des Schlüsselfeldes wechselt, habe ich die Trennlinie der obersten Zeile dieser Gruppe oben formatiert um die Blöcke besser zu unterscheiden beim Lesen.
Wenn ich jedoch nach einzelnen Wochentagen filterte erschienen teilweise diese Trennlinien nicht mehr. Deshalb habe ich dann auch die letzte Zeile unten formatiert.

Leider besteht das Problem weiterhin. 

Vielen Dank vorab für einen nützlichen Tip.

Programmauszug:


If ArtMarkierung = "beides" Or ArtMarkierung = "Trennlinie" Then
        For j = SpalteMarkierungVon To SpalteMarkierungBis
            With Worksheets(ReiterQuelldaten).Cells(Ergebnisspeicher(i), j).Borders(xlEdgeTop)
                .LineStyle = xlContinuous
                .Weight = xlThin
                .Color = RGB(0, 0, 0)
            End With
            
            With Worksheets(ReiterQuelldaten).Cells(Ergebnisspeicher(i) - 1, j).Borders(xlEdgeBottom)
                .LineStyle = xlContinuous
                .Weight = xlThin
                .Color = RGB(0, 0, 0)
            End With
        Next j
    End If

[schauan]

Hallöchen,

eventuell kannst Du die bedingte Formatierung nehmen und vielleicht auch die Zelle farbig markieren statt einen Rahmen festzulegen.

[Wolfgang1802]

Hallo,

das hilft leider nicht.
Wenn mehrfach hintereinander nur eine Zeile pro Schlüsselwert da ist sind alle gleich formatiert und es ist gar keine Trennung ersichtlich.

[snb]

Ohne Beispieldatei geht's leider nicht.

[schauan]

Hallo Wolfgang,

wenn mehrere Zeilen untereinander Rahmenlinien haben, ist doch auch nicht so deutlich getrennt?
Ich kann das bei mir leider nicht nachvollziehen, da braucht es ein konkretes Beispiel

   

[Glausius]

Oh, oh, Rahmelinien sind ein "Teufelzeug", denn sie hängen immer von der Zelle ab, wo sie eingerichtet worden sind.
So kann eine Rahenlinien sowohl bei der oberen Zelle unten als auch bei der unteren Zelle oben angeordnet sein - in der Ansicht sieht das immer gleich aus, wenn aber gefiltert wird und die obere Zelle aus dem Filter herausfällt, ist auch die in der oberen Zelle unten angeordnete Rahmenlinie weg, wäre sie aber an der unteren Zelle oben angeordnet, würde sie noch angezeigt werden!
Fazit: Um das Anzeigen sicherzustellen muss die Rahmenlinie als Trennline sowohl an der oberen als auch an der unteren Zelle angebracht werden - also xlEdgeTop UND xlEdgeBottom.