Come stampare più righe selezionate su un’unica pagina in Excel?

Qui ti spiegherò come stampare più righe selezionate su un’unica pagina utilizzando VBA in Excel. Procedi nel seguente modo:

1. Premere contemporaneamente i tasti Alt+F11 per aprire la finestra Microsoft Visual Basic for Applications.

2. Fare clic su Inserisci > Modulo, quindi incollare il seguente codice VBA nella nuova finestra Modulo che si apre.

VBA: stampa più righe selezionate su una pagina in Excel

Sub Extract_to_Print()
Dim Rg As Range, Rg1 As Range, Rg2 As Range
Dim xAddress As String
Dim xSht As Worksheet
Dim I As Long
Dim xScreenUpdate As Boolean
Dim xAlert As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set Rg = Application.InputBox("Please select ranges you will print:", "Kutools for Excel", xAddress, , , , , 8)
If Rg Is Nothing Then Exit Sub
xScreenUpdate = Application.ScreenUpdating
xAlert = Application.DisplayAlerts
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xSht = ThisWorkbook.Worksheets.Add
I = 1
For Each Rg1 In Rg.Areas
Rg1.Copy xSht.Range("A" & I)
I = I + Rg1.Rows.Count
Next
xSht.PrintOut
xSht.Delete
Application.ScreenUpdating = xScreenUpdate
Application.DisplayAlerts = xAlert
End Sub

3. Premere il tasto F5 oppure fare clic sul pulsante Esegui per eseguire questa macro VBA.

4. Ora viene visualizzata una finestra di dialogo di Kutools per Excel. Seleziona le righe multiple da stampare e fai clic sul pulsante OK per stampare queste righe.

Nota: tenendo premuto il tasto Ctrl, puoi selezionare più righe non adiacenti contemporaneamente.

Se riusciamo a copiare queste righe non consecutive e incollarle come intervallo consecutivo in un altro foglio di lavoro, possiamo stamparle facilmente su una sola pagina. Questo metodo sfrutta la potente funzionalità di Kutools per Excel: Copia intervalli, ideale per gestire questa operazione.

1. Crea un nuovo foglio di lavoro, seleziona le righe da stampare dalla tabella e fai clic su Kutools > Intervallo > Copia intervalli.

Nota: tenendo premuto il tasto Ctrl, puoi selezionare più righe non consecutive contemporaneamente.

2. Nella finestra di dialogo Copia intervalli multipli che si apre, seleziona l’opzione Tutti e fai clic sul pulsante Ok.

Nota: l’opzione Includi altezza riga e l’opzione Includi larghezza colonna copiano l’altezza delle righe e la larghezza delle colonne dell’intervallo selezionato e le applicano all’intervallo di destinazione.

3. Seleziona la cella A1 nel nuovo foglio di lavoro creato e fai clic sul pulsante OK.

4. Rimanere nel foglio di destinazione e fare clic su Kutools > Elimina > Elimina righe vuote > Foglio di lavoro attivo.

Viene quindi visualizzata una finestra di dialogo che indica quante righe sono state eliminate. Chiuderla semplicemente.

5. Fare clic su File(o sul)pulsante Office) > Stampa per stampare queste righe.

In realtà, Kutools per Excel ha progettato lo Strumento guidato Stampa selezioni multiple per stampare insieme più intervalli in Excel.

1. Fare clic su KUTOOLS PLUS > Stampa > Strumento guidato Stampa selezioni multiple per aprire lo Strumento guidato Stampa selezioni multiple.

2. Nello Strumento guidato Stampa selezioni multiple che si apre, fai clic sul pulsante Aggiungi per aggiungere le righe che desideri stampare insieme, quindi fai clic sul pulsante Fine.

Note:

(1) Dopo aver fatto clic sul pulsante Aggiungi, è possibile selezionare più intervalli non consecutivi in un foglio di lavoro tenendo premuto il tasto Ctrle selezionandoli uno alla volta;

(2) Per rimuovere un intervallo o una riga dall’elenco Intervalli da stampare, seleziona semplicemente l’intervallo o la riga desiderati e fai clic sul pulsante Elimina.

(3) Questa utility non supporta la stampa di intere righe o colonne, ad esempio l’intera riga $4:$4 o l’intera colonna $B:$B.

3. Le righe o gli intervalli selezionati sono stati incollati come immagini collegate in un nuovo foglio di lavoro. Per stamparli, fai clic su File(o sul)pulsante Office) > Stampa.