Interruzione di pagina Report

Non è chiaro lo scenario in cui operi e le modalita implementate, ad esempio

mjjfil wrote: dividere il report, allargato al max ...

Considera che le pagine nel report vengono generate in base ai valori di impostazione della pagina
(margini, pagina, colonne) ad esempio un formato A5 è metà di (dimensioni) rispetto ad un A4.
Per cui il numero di pagina è legato ai parametri della pagina e della stampante impiegata.

Senza maggiori elementi è difficile darti indicazioni.

Faccio una premessa in modo da ampliare i concetti.
E' da considerare che un report, in Access, viene ad essere generato in base alle dimensioni (larghezza ed altezza) di  quanto impostato nella struttura e ciò è inquadrato secondo il foglio impiegato per la stampa.
L'area di stampa è un riquadro più piccolo rispetto al foglio. Essa è posizionata all'angolo in alto a sinistra (in base ai margini) e fa riferimento al punto fisico ove ha inizio la pagina stessa.
Entra poi in gioco la stampante (o altro dispositivo, plotter ecc.) e le sue caratteristiche come  i margini minimi e massimi per supportare il foglio nei suoi formati  (A0...A3,A4 ...B4,B5) ecc. nelle dimensioni fisse o personalizzate.

In ogni caso le dimensioni massime per un report, in Access, sono:
- Larghezza del report  = 55,87 cm (22 pollici)
- Altezza della sezione = 55,87 cm (22 pollici)
- Altezza di tutte le sezioni più le intestazioni di sezione = 508 cm (200 pollici)
http://office.microsoft.com/it-it/access-help/specifiche-di-access-HP005186808.aspx

Ne consegue che ciascuna pagina viene generata in base al foglio, alla stampante supportata e alla struttura
del report impostata.
La generazione avviene con un processo che procede dall'alto verso il basso e da sinistra verso destra.
Ad esempio avendo un report con larghezza di 230 mm da stampare con un foglio A4 verticale (210 × 297 mm) essendo la larghezza più ampia di quella del foglio A4 si otterranno due fogli ma la pagina sarà la stessa. Infatti il numero di pagina non varierà (in quanto per ottenere il prodotto finale si dovrebbero accostare i due fogli in verticale).
Ed è per questo che, a volte, si stampano pagine vuote se si lascia la larghezza del report più ampia del foglio impiegata.

L'interruzione di pagina è legata al margine superiore ed agisce sulla altezza del foglio di conseguenza non permette di suddividere i due fogli affiancati in numero di pagine diverse.

Operando (dai menu) con "File" - "Imposta pagina" - "Colonne" (come per le etichette) agendo sul numero e la dimensioni delle colonne, di norma, si incrementa il numero di pagina ("Page") ma non il totale delle pagine ("Pages").

In ogni caso, stabilita la altezza del report si può cercare di presentare il numero di pagina in modo personlizzato in modo da seguire una propria numerazione.
 
Si può stabilire, pertanto, di inserire il numero di pagina al "piè di pagina" facendo riferimento alla continuazione della pagina successiva.
Ad esempio basta creare una casella di testo (TestoContinuazionePagina) che indichi con  una dizione il continuo sulla pagina successiva specificandone il numero.

TestoContinuazionePagina = IIf([Pages]>1 And [Page]<[Pages],"Continua su Pagina " & [Page]+1,"") 

Riprendendo il tuo esempio stabilisci se ti trovi nella prima o seconda pagina in funzione della variabile TotIntCol (che hai indicato) dopodichè calcoli un tuo numero di pagina (doppio rispetto al valore "Pages" fornito dal sistema) raddoppiando il valore di "Page" e togliendo 1 per le pagine dispari e 0 per le pari.

Per cui la tua funzione dovrebbe essere (schematicamente) variata in:

Function MioNumeroPagina as Integer
Dim TotIntCol, PaginaPrima As Integer
'DLookUp mi serve esclusivamente per verificare che le intestazioni colonna non superino quelle
'che in anteprima di stampa, si vede che occupano la prima pagina ovvero quelle dispari
TotIntCol = DLookup("[ripetizioni_int_colonna]", "QControlloRipetizioniIntCol")
If TotIntCol <= 5 Then 
   PaginaPrima = 1 ' Ci troviamo nella pagina a sinistra
Else
   PaginaPrima = 0 ' Ci troviamo nella pagina a desra
Endif 
MioNumeroPagina =  Me.Page *  2 - PaginaPrima

End Function

Viste le difficoltà, cerco di descrivere in modo più dettagliato lo scenario con cui approcciare la problematica.

mjjfil wrote: Quando apro il report in anteprima di stampa vedo 2 pagine che in realtà sono una sola, in quanto la seconda è solo il prolungamento della prima e difatti con il seguente codice VBA (MsgBox Me.Pages) mi dice che il numero di pagine è = 1

Infatti la pagina fornita dal sistema (per una foglio A4 affiancato) darebbe sempre lo stesso numero, in quanto la larghezza del report è più ampia del foglio A4.
Nel caso sopracitato, agire sulla interruzione pagina (che opera sulla lunghezza del report) non risolve il problema.

Una possibile soluzione è calcolare un proprio numero di pagina che fornisca un valore personalizzato per ciascun foglio A4.
Ad esempio avendo due fogli per ciascuna pagina, basta raddoppiare il numero Page (fornito dal sistema).
In tal caso, si lascia inalterato il valore (facendo riferimento al foglio posto a destra) mentre è necessario togliere 1 se ci troviamo nel foglio a sinistra.
Impiegando due caselle di testo una nel foglio a sinistra e una nel foglio a destra, (che visualizzino il proprio numero di pagina) questo sarà calcolato con i presupposti precedenti (dispari a sinistra = Page * 2 - 1, pari a destra = Page * 2 ).
Dal punto di vista pratico si tratta di impiegare apposite caselle di testo (nel piè di pagina) ove l'origine controllo sia appunto il valore relativo del proprio numero di pagina personalizzato, che in base al valore delle colonne presenti nella query a campi incrociati (TotIntCol nell'esempio fornito) stabilisca se vi sono due pagine affiancate e di conseguenza visualizzi o meno il relativo numero di pagina, magari, attraverso una apposita funzione che dovrai adattare alle tue esigenze.

Buon lavoro

Partendo da una query a campi incrociati che abbia un numero di colonne variabili, la soluzione proposta da Almorel (un saluto ad Alberto) non è un "accrocco", è il metodo più semplice ed efficace per avere due report prestabiliti uno con il primo foglio (A4 - Orizzontale allargato al massimo in struttura) se il numero di colonne TotIntCol è minore o uguale a 5 e con due fogli affiancati se TotIntCol è maggiore di 5.
In tal caso è il programmatore che sovrintende alla costruzione della struttura (in modo diretto) dei due report, ponendo gli elementi più consoni alle esigenze.
Infatti in tale occasione si è in grado di inserire tutti quegli elementi di base (caselle di testo ed etichette) e aggiuntivi (titoli, didascalia, totali, numeri di pagina, rimandi, ecc.) che facilitano la lettura dello stampato.
Dopodiché a partire dal report (prestabilito per la query a campi incrociati) si impostano (via codice) quegli adattamenti in grado di coniugare dati prodotti e stampato risultante.
Il concetto di fondo è che vi è una stretta dipendenza fra query a campi incrociati e e il report che ne stampa i risultati.
Dal momento che il numero delle colonne è variabile, il programmatore può pensare di adeguare il report modificando il contenuto in base ai valori restituiti dalla query e rendere dinamico (per quanto possibile) lo stampato conclusivo.
In tal caso è da generare i dati della query in modo parametrico affinché il report li possa presentare, e al contempo la realizzazione di quest'ultimo deve essere basato su ciò che lo alimenta e di conseguenza la query di partenza.
Si può, ad esempio realizzare un report che contenga il massimo delle colonne disponibili (in base alle dimensioni utilizzabili nel foglio). Per cui stabilito il numero massimo delle colonne inseribili nel report si associano le caselle di testo ed etichette acquisite dalla query.
I nomi dei campi della query a campi incrociati vengono associati ai nomi delle colonne per le etichette e i valori corrispondenti alle caselle di testo.
Le caselle di testo e le etichette possono essere rese visibili o meno in base ai valori risultanti dalla query.

Un altra strada è quella di realizzare un report minimale ove si inseriscono gli elementi comuni e successivamente si aggiungono le varie caselle di testo che scaturiscono dalle colonne prodotte dalla query a campi incrociati.

E’ da tenere presente che la creazione diretta e completa (via codice) del report non è praticabile in quanto deve essere collocato all'interno degli oggetti di sistema e non sarebbe impiegabile con un applicativo MDE e quindi l’a automazione deve essere un processo di adattamento su elementi precostituiti.

In ogni caso, un applicativo dinamico dovrebbe cercare di prendere in considerazione (per quanto possibile) tutti quegli elementi che abbino query e report. Ad esempio si possono prendere in considerazione (in base alle dimensioni massime) le colonne rappresentabili in modo da renderle equidistribuite, adattare le caselle di testo nel foglio aumentando/diminuendo il font, la larghezza. l'allineamento, adattare linee, riquadri, titoli, totali, numero di pagina e tutti quegli elementi in grado di personalizzare in modo più efficace il report.

E' chiaro che ciascuna strada percorribile implica una gestione degli elementi caratteristici del report su cui si dispongono i vari oggetti. Più è sofisticata la personalizzazione e maggiore è la logica da implementare nell'algoritmo in grado da supportarla.

I seguenti link forniscono degli esempi pratici sull'argomento.

Creare un report dinamico a campi incrociati
http://support.microsoft.com/kb/328320

Aggiungere da VBA una nuova colonna in un report
http://support.microsoft.com/kb/812719

Creare un report in VBA
http://www.access-programmers.co.uk/forums/showthread.php?t=78952

Impostare a run-time la proprietà Width e Left al controllo del report
http://msgroups.net/microsoft.public.access.reports/dynamically-add-fields-contro/119588

Personalizzazione dei criteri di attivazione del report
http://www.fontstuff.com/access/acctut19.htm

CrossTab e Report dinamici
http://www.blueclaw-db.com/report_dynamic_crosstab_field.htm
http://www.accessmonster.com/Uwe/Forum.aspx/access-gettingstarted/16527/Microsoft-Access-Dynamic-reports

Inoltre sul sito http://www.sitocomune.com/ si possono vedere i demo:
4.33 Report a campi variabili a runtime da query a campi incrociati
4.31 Report dinamici basati su query a campi incrociati parametriche
4.7  Report dinamici per rappresentazioni a campi incrociati

Ad integrazione per argomenti correlati:

Elenco dei report disponibili in MSys..
http://allenbrowne.com/ser-19.html

Operare con collezioni/oggetti 
http://msdn.microsoft.com/en-us/library/aa188204(v=office.10).aspx

Stampa Report
http://stackoverflow.com/questions/2660704/ms-access-print-report-using-vba