Hallo,
ich habe folgende Befehlsgruppe in einem SELECT Case:
Case 2
Me.GroupLevel(0).ControlSource = "Bezeichnung (Typ, genaue Bezeichnung)"
Me.KopfBezTyp.Visible = True
Me.Section(GroupHeader1).ForceNewPage = 2
Die ersten beiden Commandos funktionieren auch wunschgemäß (KopfBezTyp ist ein Textfeld im Gruppenkopf). Aber der dritte Befehl (neue Seite nach jeder Gruppe) wird schlicht und ergreifend ignoriert. Access bringt zwar keine Fehlermeldung, aber eine neue Seite gibt es auch nicht.
Ich habe auch schon Me.Section("Gruppenkopf1").ForceNewPage = 2 ausprobiert, aber da ist es dasselbe.
Vielen Dank im Voraus für Eure Hilfe
Beate1953
Hallo,
ZitatAber der dritte Befehl (neue Seite nach jeder Gruppe)
dazu benötigst Du kein VBA, das ist eine Eigenschaft die Du direkt einstellen kannst.
Siehe Bild
Hallo,
das Problem ist, dass ich 5 Gruppenköpfe habe, von denen je nach Auswahl des Users mal der Eine, mal der Andere "aktiv" ist. Deshalb auch das SELECT Case mit obiger Befehlsgruppe.
Wenn ich nun alle 5 Gruppenköpfe auf 'Neue Seite = Nach Bereich' stelle, kriege ich mehrere leere Seiten.
Deshalb brauche ich den VBA-Befehl zum Erzwingen einer neuen Seite.
Bin für jeden Tipp dankbar.
Viele Grüße
Beate1953