Bericht: Linie abhängig von Wert sichtbar/unsichtbar machen?

[Louis Noser]

Hallo miteinander

Ich möchte, dass in einem Bericht eine Linie sichtbar wird, wenn ein
Steuerelement-Inhalt (BelegNr) wechselt, ansonsten unsichtbar. Die
Variable varBelegNr im folgenden Code ist im Allgemeinen Teil des
Berichts dimensioniert, behält also den Wert bei Sub-Ende.

Der folgende Code funktioniert aber nicht wie gewünscht:

-----------------------------------------------------------------
Private Sub Detailbereich_Print(Cancel As Integer, PrintCount As Integer)

If varBelegNr = 0 Then
varBelegNr = Me!BelegNr
ElseIf varBelegNr <> Me!BelegNr Then
Me!LinieTitelDetail.Visible = True
varBelegNr = Me.BelegNr
Else: Me!LinieTitelDetail.Visible = False
End If

End Sub
-----------------------------------------------------------------

Weiss jemand des Rätsels Lösung?

Vielen Dank.

Grüsse
Louis

[Louis Noser]

Auch dieses Rätsel hat sich gelöst. :-)

Ich habe mich selber veräppelt, indem ich die Linienfarbe unbeabsichtigt
weiss eingestellt hatte.

Und: Ich bin kein Troll. Auch wenn das vielleicht so scheint. :-)

Grüsse
Louis

Post by Louis Noser
Hallo miteinander
Ich möchte, dass in einem Bericht eine Linie sichtbar wird, wenn ein
Steuerelement-Inhalt (BelegNr) wechselt, ansonsten unsichtbar. Die
Variable varBelegNr im folgenden Code ist im Allgemeinen Teil des
Berichts dimensioniert, behält also den Wert bei Sub-Ende.
-----------------------------------------------------------------
Private Sub Detailbereich_Print(Cancel As Integer, PrintCount As Integer)
    If varBelegNr = 0 Then
        varBelegNr = Me!BelegNr
    ElseIf varBelegNr <> Me!BelegNr Then
            Me!LinieTitelDetail.Visible = True
            varBelegNr = Me.BelegNr
    Else: Me!LinieTitelDetail.Visible = False
    End If
End Sub
-----------------------------------------------------------------
Weiss jemand des Rätsels Lösung?
Vielen Dank.
Grüsse
Louis