Come stampare un foglio di lavoro in Excel senza includere le righe vuote?
Durante la stampa del foglio di lavoro, vengono stampate anche le righe vuote. Alcuni utenti di Excel preferiscono invece stampare il foglio senza righe vuote, per compattare i dati e risparmiare carta. Ma come si fa a stampare un foglio di lavoro senza righe vuote in Excel? Questo articolo presenta due metodi efficaci.
Nascondi Righe vuote prima della stampa con codice VBA
Elimina righe vuote prima della stampa con Kutools per Excel
Nascondi Righe vuote prima della stampa con codice VBA
Prima di stampare il foglio di lavoro, puoi eseguire il seguente codice VBA per nascondere le righe vuote all’interno di un intervallo specifico. Procedi nel modo seguente.
1. Premi i tasti Alt+F11 per aprire la finestra di Microsoft Visual Basic for Applications.
2. Nella finestra di Microsoft Visual Basic for Applications, fai clic su Inserisci > Modulo. Quindi copia e incolla il seguente codice VBA nella finestra del modulo.
Codice VBA: Nascondi Righe vuote Intervallo selezionato
Sub HideBlankRows()
Dim xRg As Range
Dim xCell As Range
Dim xAddress As String
Dim xUpdate As Boolean
Dim I As Long
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
Set xRg = Application.Intersect(xRg, ActiveSheet.UsedRange)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "Don't support multiple ranges", , "Kutools for Excel"
Exit Sub
End If
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
For I = 1 To xRg.Rows.Count
xRg.Rows(I).EntireRow.Hidden = (Application.CountA(xRg.Rows(I)) = 0)
Next
Application.ScreenUpdating = xUpdate
End Sub3. Premi il tasto F5 per eseguire il codice. A questo punto si aprirà una finestra di dialogo Kutools per Excel; seleziona l’intervallo contenente le righe vuote che non desideri stampare, quindi fai clic sul pulsante OK.
Tutte le righe vuote nell'intervallo selezionato vengono nascoste immediatamente. Ora puoi procedere con la stampa del foglio di lavoro senza righe vuote.
Nota: dopo la stampa, puoi ripristinare la visibilità di queste righe vuote utilizzando il seguente codice VBA.
Codice VBA: Rendi visibili tutti i Righe vuote Intervallo selezionato
Sub UnhideRows()
Dim xRg As Range
Dim xCell As Range
Dim xAddress As String
Dim xUpdate As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select a range to unhide the blank rows", "Kutools for Excel", xAddress, , , , , 8)
Set xRg = Application.Intersect(xRg, ActiveSheet.UsedRange)
If xRg Is Nothing Then Exit Sub
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
xRg.EntireRow.Hidden = False
Application.ScreenUpdating = xUpdate
End SubElimina righe vuote prima della stampa con Kutools per Excel
Se desideri stampare un foglio di lavoro senza righe vuote, ti consigliamo di eliminarle tutte con l’utilità Elimina righe vuote di Kutools per Excel, dopodiché potrai stampare manualmente il foglio di lavoro.
1. Fai clic su Kutools > Elimina > Elimina righe vuote > Intervallo selezionato / Foglio di lavoro attivo / Fogli di lavoro selezionati / In tutti i fogli, in base alle tue esigenze. Vedi screenshot:
Nota: per eliminare le righe vuote in un intervallo, seleziona prima l’intervallo desiderato, quindi applica la funzione.
2. Si aprirà quindi una finestra di dialogo che indica quante righe sono state eliminate; fai clic sul pulsante OK.
Ora tutte le righe vuote sono state eliminate. Puoi procedere con la stampa del tuo foglio di lavoro.
Nota: questa utilità supporta l’annullamento tramite Ctrl+Z.
Se desidera provare gratuitamente (30 giorni) questa utility, faccia clic qui per scaricarla, quindi segua la procedura illustrata nei passaggi sopra.
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