Come stampare più righe selezionate in una sola pagina in Excel?

Qui parlerò di come stampare più righe selezionate su una pagina utilizzando VBA in Excel. Si prega di seguire i passaggi seguenti:

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 del 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 o fare clic sul pulsante Esegui per eseguire questo VBA.

4. Ora appare una finestra di dialogo di Kutools per Excel. Selezionare più righe che si desidera stampare e fare clic sul pulsante OK per stampare queste righe.

Nota: Tenendo premuto il tasto Ctrl, è possibile selezionare più righe non adiacenti contemporaneamente.

Se possiamo copiare queste righe non consecutive e incollarle come un intervallo consecutivo in un altro foglio di lavoro, possiamo facilmente stamparle su una sola pagina. Questo metodo introdurrà l'utilità Copia intervalli di Kutools per Excel per gestire questa operazione.

1. Creare un nuovo foglio di lavoro, quindi selezionare le righe che si desidera stampare dalla tabella e fare clic su Kutools > Intervallo > Copia intervalli.

Nota: Tenendo premuto il tasto Ctrl, è possibile selezionare più righe inconsecutive contemporaneamente.

2. Nella finestra di dialogo Copia intervalli multipli che si apre, selezionare l'opzione Tutti e fare clic sul pulsante Ok.

Nota: Le opzioni Includi altezza riga e Includi larghezza colonna copieranno le altezze delle righe e le larghezze delle colonne degli intervalli selezionati e li incolleranno nell'intervallo di destinazione.

3. Selezionare la cella A1 nel foglio di lavoro appena creato e fare clic sul pulsante OK.

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

A questo punto, apparirà una finestra di dialogo che mostra quante righe sono state eliminate. Chiudetela semplicemente.

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

In realtà, Kutools per Excel ha progettato la funzione Stampa Selezione Multipla Wizard per stampare più intervalli insieme in Excel.

1. Fare clic su Kutools Plus > Stampa > Stampa Selezione Multipla Wizard per aprire lo Stampa Selezione Multipla Wizard.

2. Nello Stampa Selezione Multipla Wizard che si apre, fare clic Aggiungi pulsante  per aggiungere le righe che si desidera stampare insieme e fare clic sul Fine pulsante.

Note:

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

(2) Per rimuovere un intervallo/riga dalla Intervalli da stampare lista, basta selezionare questo intervallo/riga e fare clic sul Elimina pulsante.

(3) Questa utilità non supporta la stampa di intere righe e colonne, come ad esempio l'intera riga $4:$4 o l'intera colonna $B:$B.

3. Le righe/intervalli selezionati sono stati incollati come immagini collegate in un nuovo foglio di lavoro. Procedere facendo clic su File (o pulsante Office) > Stampa per stamparlo.