Una famiglia di sistemi di gestione per database relazionali di Microsoft progettati per semplificare l'uso.
Ciao Sara,
aggiungi nel codice le righe in grassetto:
Private Sub IntestazioneGruppo0_Format(Cancel As Integer, FormatCount As Integer)
If Switch_Page = False And (Me.ospitenumero Mod 2 = 1 Or Me.ospitenumero > Next_Numero) Then
Me.IntestazioneGruppo0.ForceNewPage = 2
Switch_Page = True
Else
Me.IntestazioneGruppo0.ForceNewPage = 0
Switch_Page = False
End If
End Sub
Ciao Mimmo