Leider hat mir die SuFu nicht das beschert, wonach ich suche:
1.) Ein Bericht, basierend auf einer Abfrage.
2.) Der Bericht ist zweifach gruppiert/sortiert:
2.a) Nach Produktionswerk gruppiert & innerhalb der Gruppierung nach Werksort sortiert (=1. Ebene)
2.b) Nach Lieferant gruppiert & innerhalb der Gruppierung nach Lieferantennamen sortiert (=2. Ebene)
3.) Berichtskopf: leer/ungenutzt
Seitenkopf: außer Berichtskopf. Enthält Überschriften zu Detailbereich.
Kopfbereich Werk (=1. Gruppierung): leer/ungenutzt
Kopfbereich Lieferant (=2. Gruppierung): Dokument > 1 Seite Din A 4, mit Seitenumbruch, nach Seitenumbruch: Überschriften zu Detailbereich.
Detailbereich: Steuerelemente
Problem:
Wenn innerhalb der Gruppierung 1 der Wechsel zum 2. Datensatz der 2. Gruppierung gedruckt werden soll, erscheint über dem "Kopfbereich Lieferant" der Seitenkopf.
Frage:
Wie kann ich diesen Seitenkopf gezielt unterdrücken?
Alternative:
Wie kann ich meinem Datenbereich einmalig pro Seite für alle dort gelisteteten Datensätze eine Überschrift zuweisen, falls ich dies nicht im Seitenkopf und nicht im "Kopfbereich Lieferant" mache.
Ich verwende garantiert mal wieder die falschen Bezeichnungen für einen Sachverhalt, der "an sich" wahrschienlich stocksimpel ist - nur ich komem nicht drauf.
Jede Hilfe wird dankend genommen!
Thks,
Mover
Hallo,
ein Versuch:
Der Seitenkopf heißt so, weil er auf JEDER Seite angezeigt wird.
Den Seitenkopf kannst du über den Berichtsentwurf rausnehmen, ebenso den Berichtskopf, wenn du den nicht benötigst.
Die Überschriften legst du in den Gruppenkopf, der wird bei jedem Gruppenwechsel wiederholt.
Seitenumbruch ist immer etwas problematisch.
Habe leider keine Möglichkeit das real nachzustellen - mangels passender DB
Hi Database,
vielen Dank für Deine Hilfe.
Ich versuche derzeit auf diesem Wege, dem Thema "Herr zu werden":
´
ZitatPrivate Sub Seitenkopfbereich_Format(Cancel As Integer, FormatCount As Integer)
If Me.Gruppenkopf0.Visible And Me.Gruppenkopf1.Visible = True Then
Me.Seitenkopfbereich.Visible = False
Else
Me.Seitenkopfbereich.Visible = True
End If
End Sub
Leider unterbindet das den Seitenkopf bislang dauerhaft, scheinbar greift die Formatierung der Seite nicht als Trigger.
Noch jemand Ideen?
Thks,
Mover
Hallo,
ZitatSeitenkopf: außer Berichtskopf. Enthält Überschriften zu Detailbereich.
ich denke, der Fehler liegt schon in diesem Ansatz, die Überschrften gehören in einen Gruppenkopf. Notfalls fügst du eine Gruppenebene ein zweites Mal hinzu, um die Köpfe separat steuern zu können.
Was das Ausblenden des Seitenkopfes betrifft, so sollte das grundsätzlich möglich sein, aber dort vorgenommen werden, wo die Entscheidung fällt.
Alternativ kannst du auch die Cancel-Option nutzen:
Private Sub Seitenkopfbereich_Format(Cancel As Integer, FormatCount As Integer)
If Me.Gruppenkopf0.Visible And Me.Gruppenkopf1.Visible Then
Cancel = True
End If
End SubWenn das nicht gelingt, würde ich das wie eingangs beschrieben umstellen.
PS:
Wieso hast du die Überschriften zum Detailbereich zweimal?! ???
Der Berichtsaufbau würde mich mal interessieren. Sicher gibt es noch eine andere Lösung.