Excel è uno strumento utile per tenere traccia di tutti i tipi di dati. Molte persone lo utilizzano al lavoro per creare report ad-hoc per diversi reparti o progetti. Mentre lavori con i tuoi dati, potresti chiederti come puoi inserire automaticamente interruzioni di pagina quando il contenuto di una determinata colonna cambia. Ad esempio, potresti avere una colonna che contiene i nomi dei dipartimenti e potresti volere che ogni dipartimento inizi su una nuova pagina.

Questo è piuttosto facile da fare con la funzione Subtotali incorporata di Excel.

Tutto quello che devi fare è seguire questi passaggi generali:

  1. Assicurati che la tabella contenga etichette di colonna. Ad esempio, se la colonna A contiene i nomi dei dipartimenti, la cella A1 potrebbe contenere un’etichetta come “Reparto”. Assicurati che tutte le colonne abbiano etichette.

  2. Ordina i dati nella tabella, utilizzando la colonna del reparto come chiave.

  3. Visualizza la scheda Dati della barra multifunzione.

  4. Con qualsiasi cella all’interno della tabella ancora selezionata, fare clic sullo strumento Subtotale nel gruppo Struttura. Excel visualizza la finestra di dialogo Subtotale. (Vedi figura 1.)

  5. Utilizzando l’elenco a discesa Ad ogni cambio in, selezionare Reparto.

  6. Utilizzando l’elenco a discesa Usa funzione, selezionare Conteggio.

  7. Utilizzando l’elenco Aggiungi totale parziale a, selezionare il nome della colonna in cui si desidera visualizzare il totale parziale.

  8. Assicurati che la casella di controllo Interruzione di pagina tra i gruppi sia selezionata.

  9. Fare clic su OK. Excel aggiunge i subtotali e il conteggio delle pagine, come indicato.

Se, per qualche motivo, non desideri utilizzare la funzione Subtotali, puoi sempre scrivere una macro che rimuoverà tutte le interruzioni di pagina nel foglio di lavoro, quindi aggiungere nuove interruzioni di pagina nei punti appropriati. La seguente macro farà il trucco:

Sub PageBreak()

Dim CellRange As Range     Dim TestCell As Range

Set CellRange = Selection     For Each TestCell In CellRange         ActiveSheet.Rows(TestCell.Row).PageBreak = xlPageBreakNone         If TestCell.Value <> TestCell.Offset(-1, 0).Value Then             ActiveSheet.Rows(TestCell.Row).PageBreak = xlPageBreakManual         End If     Next TestCell End Sub

Per utilizzare la macro, seleziona semplicemente le celle che desideri utilizzare come chiave per eseguire le suddivisioni, meno la cella in alto. Ad esempio, se i reparti si trovano nella colonna A, dalle righe da 2 a 37, si selezionerà l’intervallo da A3 ad A37. Esegui la macro e tutte le vecchie interruzioni di pagina vengono rimosse e ne vengono aggiunte di nuove.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (7991) si applica a Microsoft Excel 2007, 2010 e 2013. Puoi trovare una versione di questo suggerimento per l’interfaccia del menu precedente di Excel qui:

Interruzioni di pagina condizionali.