Come si fa a stampare una colonna lunga su un’unica pagina in Excel?
Si supponga di avere un elenco lungo di dati in una colonna, ad esempio 200 righe, e di doverlo stampare. Tuttavia, la stampa occupa circa 5 pagine, con una sola colonna sul lato sinistro e molto spazio bianco sul lato destro. In Word è possibile creare colonne, ma Excel non offre questa funzione. Come si può stampare l’intero elenco su una singola pagina per risparmiare carta?
Stampare una colonna lunga su una pagina con formula
Stampare una colonna lunga su una pagina con codice VBA
Stampare una colonna lunga su una pagina con Kutools per Excel
Stampare una colonna lunga su una pagina con formula
Di seguito viene presentata una formula avanzata per risolvere questo problema. Procedi nel modo seguente:
1. In un nuovo foglio di lavoro della propria cartella di lavoro corrente, inserire la formula =IF(OFFSET(Sheet1!$A$1,(COLUMN()-1)*45+ROW()-1,0)=«»,"",OFFSET(Sheet1!$A$1,(COLUMN()-1)*45+ROW()-1,0)) nella cella A1.
- Foglio1 è il foglio di lavoro che contiene l'elenco lungo che si desidera suddividere in colonne.
- 45 è il numero di riga da cui si desidera iniziare a elencare i dati in una colonna.
- Si tratta tutte di variabili e possono essere personalizzate in base alle proprie esigenze.
2. Seleziona quindi la cella A1 e trascina il quadratino di riempimento verso il basso fino alla riga 45, poi continua a trascinarlo verso destra finché non compaiono tutti i dati. In questo modo, la colonna lunga verrà suddivisa in più colonne per adattarsi perfettamente a una pagina nel nuovo foglio di lavoro. Guarda lo screenshot:
Stampare una colonna lunga su una pagina con codice VBA
Anche il seguente codice VBA ti permette di suddividere un lungo elenco di dati in più colonne, facilitando la stampa e aiutandoti a risparmiare carta.
1. Tenere premuti i tasti ALT + F11 per aprire la finestra di Microsoft Visual Basic, Applications.
2. Fare clic su Inserisci > Modulo e incollare il codice seguente nella finestra del modulo.
Sub SingleToMultiColumn()
Dim rng As Range
Dim iCols As Integer
Dim lRows As Long
Dim iCol As Integer
Dim lRow As Long
Dim lRowSource As Long
Dim x As Long
Dim wks As Worksheet
Set rng = Application.InputBox _
(prompt:="Select the range to convert", _
Type:=8)
iCols = InputBox("How many columns do you want?")
lRowSource = rng.Rows.Count
lRows = lRowSource / iCols
If lRows * iCols <> lRowSource Then lRows = lRows + 1
Set wks = Worksheets.Add
lRow = 1
x = 1
For iCol = 1 To iCols
Do While x <= lRows And lRow <= lRowSource
Cells(x, iCol) = rng.Cells(lRow, 1)
x = x + 1
lRow = lRow + 1
Loop
x = 1
Next
End Sub
3. Premere quindi il tasto F5 per eseguire il codice e selezionare l’elenco di dati da suddividere nella finestra di dialogo visualizzata. Vedere lo screenshot:
4. Fare clic su OK e inserire il numero di colonne in cui suddividere i dati. Vedere lo screenshot:
5. Fare quindi clic su OK e la colonna lunga verrà suddivisa in cinque colonne in un nuovo foglio di lavoro. Vedere gli screenshot:
 |  |  |
Stampare una colonna lunga su una pagina con Kutools per Excel
Sia le formule complesse che il codice VBA possono risultare difficoltosi. Ecco un metodo semplice e pratico per risolvere il problema: la funzione Kutools per Excel di Dividi in colonne ti permette di suddividere rapidamente una colonna lunga in più colonne, ottimizzandola per la stampa.
Kutools per Excel include oltre 300 strumenti utili per Excel. Provalo gratis per 30 giorni senza alcuna limitazione. Scaricalo ora.
Dopo aver installato Kutools per Excel, procedere come segue:
1. Fare clic su KUTOOLS PLUS > Dividi in colonne. Vedere lo screenshot:
2. Nella finestra di dialogo visualizzata:
- Fai clic sul primo
pulsante per selezionare il titolo dell'intervallo, quindi sul secondo pulsante per selezionare la colonna da suddividere.
- Specificare quindi il numero di righe da inserire per pagina in Righe per Pagina e il numero di colonne desiderato in una pagina in Colonne per Pagina. Vedere lo screenshot:
pulsante per selezionare il titolo dell'intervallo, quindi sul secondo 
3. Fare quindi clic su OK e l’elenco lungo sarà stato suddiviso in cinque colonne su una pagina. Vedere gli screenshot:
 | |  |
- 1. Il titolo verrà inserito all’inizio di ogni colonna.
- 2. Se si seleziona l'opzione Crea Collegamento con il Foglio di Lavoro Corrente, i dati del nuovo foglio di lavoro potranno essere collegati ai dati di origine.
- Per ulteriori informazioni su questa funzionalità, fai clic su Stampa più colonne.
Migliori Strumenti per la Produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!
Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.
Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.
- Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
- Funziona meglio insieme— produttività ottimizzata tra le app di Office
- Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
- Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi