Come stampare i bordi intorno a ogni pagina in Excel?
Quando si lavora con fogli di lavoro estesi che si estendono su centinaia di pagine, stampare i dati in un formato chiaro e professionale diventa essenziale. Un modo efficace per ottenere questo risultato è aggiungere un bordo intorno a ogni pagina stampata, in modo da renderla visivamente distinta e più facile da leggere. Sebbene sia possibile selezionare manualmente il contenuto di ciascuna pagina e applicarvi bordi in Excel, questo approccio risulta estremamente dispendioso in termini di tempo e poco pratico quando si gestiscono numerose pagine. Fortunatamente, esistono soluzioni molto più efficienti per stampare automaticamente bordi intorno a ogni pagina in Excel. In questo articolo esploreremo diversi metodi pratici per raggiungere questo obiettivo, sfruttando sia strumenti integrati che approcci alternativi.
➤ Stampare i bordi intorno a ogni pagina impostando le linee della griglia
➤ Stampare i bordi intorno a ogni pagina con un clic tramite Kutools per Excel
➤ Stampare i bordi intorno a ogni pagina utilizzando l’automazione con macro VBA
Stampare i bordi intorno a ogni pagina impostando le linee della griglia
Sebbene Excel non offra un’opzione dedicata per aggiungere un bordo intorno a ogni pagina stampata, puoi usare la funzione Stampa linee griglia per simulare i bordi di pagina. È una soluzione rapida, senza bisogno di componenti aggiuntivi. Tieni presente che non verrà creato un contorno di pagina evidenziato: Excel stampa tutte le linee della griglia, e il margine della pagina è definito visivamente dalle ultime linee stampate.
Note:
- Questo metodo offre i migliori risultati quando il foglio di lavoro presenta un layout regolare a griglia e non fa affidamento su bordi personalizzati evidenti.
- Se il foglio utilizza già bordi distintivi per le tabelle, le linee della griglia stampate potrebbero generare un effetto visivo contrastante.
1. Se sono presenti bordi personalizzati, rimuovili prima per evitare sovrapposizioni o linee inconsistenti in stampa. Seleziona il foglio, quindi vai su Home > Bordo (icona) > Nessun bordo per eliminare i bordi da tutte le celle selezionate:
2. Andare su Layout di pagina > fare clic sul pulsante di avvio finestra di dialogo Impostazioni Pagina (freccia piccola nell’angolo del gruppo) per aprire la finestra di dialogo Impostazioni Pagina:
3. Nella finestra Impostazioni Pagina, passare alla scheda Foglio e selezionare la casella Linee griglia nella sezione Stampa per stampare tutte le linee della griglia (incluse quelle ai margini della pagina):
4. Fare clic su Anteprima di stampa per confermare il risultato. Al momento della stampa, ogni pagina mostrerà un chiaro contorno rettangolare formato dalle linee della griglia più esterne, simulando un bordo di pagina. Vedere l’esempio:
Suggerimenti:
- Se sono necessari bordi più spessi e visibili, valuta di aggiungere manualmente i bordi esterni all’Area di stampa oppure di utilizzare una macro per tracciare i contorni delle pagine.
- Evita aree con celle unite o irregolari: potrebbero interrompere la continuità visiva delle linee della griglia in stampa.
- Anteprima sempre prima di stampare per assicurarti che il risultato sia esattamente come lo desideri.
Sblocca la magia di Excel con KUTOOLS AI
- Esecuzione intelligente: Esegui operazioni sulle celle, analizza i dati e crea grafici, il tutto con comandi semplici e intuitivi.
- Formule personalizzate: crea formule su misura per ottimizzare i tuoi flussi di lavoro.
- Codifica VBA: Scrivi e implementa codice VBA in modo semplice e immediato.
- Interpretazione delle formule: Comprendi con facilità anche le formule più complesse.
- Traduzione del testo: Superate le barriere linguistiche direttamente nei vostri fogli di calcolo.
Stampare i bordi intorno a ogni pagina con un clic tramite Kutools per Excel
Per gli utenti che desiderano un bordo di pagina dall’aspetto più professionale—specialmente nei fogli con formattazione complessa o quando le linee della griglia non bastano—Kutools per Excel offre una soluzione pratica: la funzione Aggiungi bordi ai salti di pagina. Questo strumento permette di aggiungere un bordo solido a ogni pagina stampabile del foglio attivo con un solo clic, risparmiando tempo e garantendo un aspetto coerente su tutte le pagine.
Dopo aver installato Kutools per Excel, seguire questi passaggi per Aggiungi bordi ai salti di pagina:
1. Attiva il foglio in cui desideri aggiungere i bordi, quindi vai su Enterprise > Stampa > Aggiungi bordi ai salti di pagina. Vedere lo screenshot:
2. Se appare una finestra di dialogo che avverte che tutti i bordi esistenti verranno eliminati continuando, assicurati di aver salvato il lavoro o di aver confermato che la sovrascrittura dei bordi sia accettabile. Fai clic su Sì per procedere:
Una volta applicato, ogni pagina del foglio di lavoro sarà delimitata da un bordo netto e ben definito, garantendo stampe ordinate e facilmente distinguibili. Questo metodo è rapido e richiede il minimo sforzo manuale.
Suggerimenti e note:
- I bordi esistenti verranno rimossi dal foglio di lavoro corrente quando si utilizza questa opzione.
- Se è necessario conservare bordi specifici, si consiglia di eseguire prima un backup del file o del foglio di lavoro.
- Questa opzione è ideale per fogli di lavoro estesi, composti da più pagine stampate, che richiedono bordi di pagina coerenti e ben visibili.
Stampare i bordi intorno a ogni pagina utilizzando l’automazione con macro VBA
Se desideri automatizzare l’aggiunta di un bordo intorno a ogni pagina stampabile—specialmente per attività ricorrenti o layout personalizzati—puoi utilizzare una macro VBA che legge le interruzioni di pagina di Excel e disegna un contorno per ciascuna pagina. Questo approccio ti offre il pieno controllo su stile e spessore del bordo, senza dover fare affidamento su componenti aggiuntivi.
Note:
- La macro delinea ogni pagina stampabile con un bordo esclusivamente lungo i margini esterni (superiore, sinistro, inferiore e destro), senza sovrascrivere i bordi interni delle celle già presenti.
- Funziona al meglio con fogli ben strutturati; layout complessi o aree di stampa insolite potrebbero richiedere piccoli aggiustamenti.
Procedura operativa:
1. Premere Alt + F11 per aprire l’editor di Visual Basic, Applications. Fare clic su Inserisci > Modulo per aggiungere un nuovo modulo.
2. Copia e incolla il codice seguente nel modulo:
Sub AddBorderToEachPrintablePage()
Dim ws As Worksheet
Dim LastRow As Long, LastCol As Long
Dim StartRow As Long, EndRow As Long
Dim StartCol As Long, EndCol As Long
Dim vRowBreaks As Variant, vColBreaks As Variant
Dim i As Long, j As Long
Dim oldDisp As Boolean
Dim f As Range
Set ws = ActiveSheet
Application.ScreenUpdating = False
Application.EnableEvents = False
' Check if sheet is empty
Set f = ws.Cells.Find(What:="*", LookIn:=xlFormulas, LookAt:=xlPart, _
SearchOrder:=xlByRows, SearchDirection:=xlPrevious, MatchCase:=False)
If f Is Nothing Then GoTo CleanUp
LastRow = ws.Cells.Find(What:="*", LookIn:=xlFormulas, LookAt:=xlPart, _
SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
LastCol = ws.Cells.Find(What:="*", LookIn:=xlFormulas, LookAt:=xlPart, _
SearchOrder:=xlByColumns, SearchDirection:=xlPrevious).Column
' Force refresh of page breaks
oldDisp = ws.DisplayPageBreaks
ws.DisplayPageBreaks = True
' Collect horizontal page breaks (add top and bottom bounds)
vRowBreaks = Array(0)
For i = 1 To ws.HPageBreaks.Count
vRowBreaks = ArrayJoin(vRowBreaks, Array(ws.HPageBreaks(i).Location.Row - 1))
Next i
vRowBreaks = ArrayJoin(vRowBreaks, Array(LastRow))
' Collect vertical page breaks (add left and right bounds)
vColBreaks = Array(0)
For j = 1 To ws.VPageBreaks.Count
vColBreaks = ArrayJoin(vColBreaks, Array(ws.VPageBreaks(j).Location.Column - 1))
Next j
vColBreaks = ArrayJoin(vColBreaks, Array(LastCol))
' Draw only outer borders for each printable page
For i = 0 To UBound(vRowBreaks) - 1
StartRow = vRowBreaks(i) + 1
EndRow = vRowBreaks(i + 1)
For j = 0 To UBound(vColBreaks) - 1
StartCol = vColBreaks(j) + 1
EndCol = vColBreaks(j + 1)
With ws.Range(ws.Cells(StartRow, StartCol), ws.Cells(EndRow, EndCol))
With .Borders(xlEdgeTop)
.LineStyle = xlContinuous: .Weight = xlThick
End With
With .Borders(xlEdgeLeft)
.LineStyle = xlContinuous: .Weight = xlThick
End With
With .Borders(xlEdgeBottom)
.LineStyle = xlContinuous: .Weight = xlThick
End With
With .Borders(xlEdgeRight)
.LineStyle = xlContinuous: .Weight = xlThick
End With
End With
Next j
Next i
CleanUp:
ws.DisplayPageBreaks = oldDisp
Application.EnableEvents = True
Application.ScreenUpdating = True
If Not f Is Nothing Then
MsgBox "Borders have been added to each printable page!", vbInformation, "AddBorderToEachPrintablePage"
End If
End Sub
Function ArrayJoin(a As Variant, b As Variant) As Variant
Dim temp() As Variant
Dim alen As Long, blen As Long, k As Long
alen = UBound(a) - LBound(a) + 1
blen = UBound(b) - LBound(b) + 1
ReDim temp(0 To alen + blen - 1)
For k = 0 To alen - 1
temp(k) = a(k)
Next k
For k = 0 To blen - 1
temp(alen + k) = b(k)
Next k
ArrayJoin = temp
End Function
3. Torna a Excel, assicurati che il foglio di destinazione sia attivo ed esegui la macro con F5(o tramite il pulsante)Esegui). La macro rileverà le interruzioni di pagina e disegnerà un bordo spesso intorno a ciascun blocco di pagina stampabile.
Suggerimenti:
- Regola lo stile e lo spessore del bordo modificando le quattro sezioni
xlEdge*(ad esempio,).Weight = xlMedium) e il colore tramite.Color. - Se è impostata un’Area di stampa personalizzata, Excel seguirà tale impostazione; verifica i risultati nell’Anteprima di stampa.
- Salva la cartella di lavoro prima di eseguire le macro. Per utilizzi ripetuti, salvala come file abilitato alle macro ()
.xlsm). - Se non viene rilevato alcun contenuto, la macro termina in modo sicuro visualizzando un messaggio (evitando errori su fogli vuoti).
Se la macro non funziona come previsto, controlla la presenza di Unito, righe o colonne nascoste oppure impostazioni di ridimensionamento insolite (ad esempio, «Adatta a 1 pagina di larghezza per N pagine di altezza»). Puoi migliorare i blocchi di pagina modificando l’Area di stampa o le Impostazioni pagina ed eseguendo nuovamente la macro.
Aggiungi bordo intorno a ogni pagina
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