Unerwünschter Seitenumbruch; GroupLevel; ForceNewPage

[Beate1953]

Hallo,

ich habe folgenden (leicht gekürzten) Code, der mir bei jedem Wechsel in der Gruppe bei Sortwert1 einen Seitenumbruch macht (das ist richtig, das soll er machen). Bei einem Wechsel in der Gruppe von Sortwert2 macht er ebenfalls einen Seitenumbruch (was er nicht machen soll). Das ...ForceNewPage  =  0  scheint er zu ignorieren.

Select Case Sortwert1
   Case 3
       Me.GroupLevel(0).ControlSource = "Gerätegruppen.Bezeichnung"
       Me.KopfBez.Visible = True
       SortierW1 = "Gerätetyp"
        Me.Section(.ForceNewPage = 2
   Case 4
        Me.GroupLevel(0).ControlSource = "Abteilungen.Ort"
        Me.KopfOrt.Visible = True
        SortierW1 = "Standort"
        Me.Section(10).ForceNewPage = 2
End Select
Sort1 = Me.GroupLevel(0).ControlSource



If Sortwert1 <> Sortwert2 Then

   Select Case Sortwert2
   Case 3
        Me.GroupLevel(1).ControlSource = "Gerätegruppen.Bezeichnung"
        SortierW2 = "Gerätetyp"
        Me.Section(.ForceNewPage = 0
   Case 4
        Me.GroupLevel(1).ControlSource = "Abteilungen.Ort"
        SortierW2 = "Standort"
        Me.Section(10).ForceNewPage = 0
     End Select
     Sort2 = Me.GroupLevel(1).ControlSource
   
Else
   Sort2 = Sort1
   SortierW2 = SortierW1
   
End IF

Was kann ich tun, um den zweiten Seitenumbruch rauszukriegen?

Vielen Dank im Voraus
Beate1953