Come stampare solo le pagine pari o dispari in Excel?

Tuttavia, la finestra di dialogo Stampa di Excel non offre un modo diretto per stampare solo le pagine dispari o solo le pari, il che può essere scomodo in vari scenari di ufficio o di segnalazione dati, dove è necessario rivedere, distribuire o archiviare specifiche pagine da un foglio di lavoro lungo.
Questo articolo fornisce due soluzioni efficaci per questa limitazione in Excel. Troverete sia una macro VBA per stampare le pagine dispari o pari, sia un approccio più flessibile utilizzando Kutools per Excel, così da poter scegliere il metodo che meglio si adatta alle vostre esigenze e al vostro livello di comfort tecnico.
Stampare solo le pagine dispari o pari con codice Macro
Stampa pagine dispari, pari o specifiche a piacimento con Kutools per Excel

Soluzione alternativa: Stampa manuale delle pagine dispari o pari tramite la finestra di dialogo Stampa
Stampare solo le pagine dispari o pari con codice Macro
In Excel, mentre l'interfaccia di stampa manca di opzioni dirette per la selezione di pagine dispari/pari, è possibile ottenere ciò tramite una macro VBA. Questo metodo è adatto se vi sentite a vostro agio nell'eseguire semplici codici e avete bisogno di una soluzione che funzioni senza strumenti di terze parti. È particolarmente pratico per attività una tantum o per utenti che non richiedono frequentemente una gestione complessa della stampa.
Prima di iniziare, assicuratevi che il vostro foglio di lavoro sia stato formattato per la stampa e confermate in Anteprima di stampa quante pagine verranno generate. Questo vi aiuterà a evitare stampe vuote o non necessarie a causa di interruzioni di pagina impreviste.
1. Aprite il foglio di lavoro che intendete stampare, quindi premete Alt + F11 per avviare l'editor Microsoft Visual Basic for Applications (VBA).
2. Nell'editor VBA, fate clic su Inserisci > Modulo per inserire un nuovo modulo e incollate il seguente codice nella finestra dello script. Fate riferimento allo screenshot per la guida.
VBA: Stampa solo pagine dispari o pari
Sub Odd_Even_Print()
'UpdatebyExtendoffice20160901
Dim xTotalPages As Long
Dim xStartPage As String
Dim xPage As Integer, xYesorNo
Application.ScreenUpdating = False
xStartPage = InputBox("Enter 1 for Odd, 2 for Even", "Kutools for Excel")
If xStartPage = "" Then Exit Sub
xTotalPages = ActiveSheet.PageSetup.Pages.Count
xYesorNo = MsgBox("Are you sure to print?", vbYesNo, "Kutools for Excel")
If xYesorNo = vbYes Then
For xPage = Int(xStartPage) To xTotalPages Step 2
ActiveSheet.PrintOut from:=xPage, To:=xPage
Next
Else
Exit Sub
End If
Application.ScreenUpdating = True
End Sub
Quando copiate e incollate il codice, assicuratevi di non sovrascrivere macro esistenti che potrebbero servirvi.
3. Premere F5 per eseguire la macro. Apparirà un prompt per specificare la vostra scelta: inserite 1 se desiderate stampare solo le pagine numerate dispari, oppure 2 per le pagine numerate pari.
Nota: Ricontrollate attentamente la vostra immissione (1 o 2), poiché un input errato potrebbe impedire alla macro di funzionare correttamente. Se inserite un valore non valido, probabilmente la macro vi avviserà o semplicemente non farà nulla.
4. Dopo aver inserito la vostra selezione, fate clic su OK. Apparirà un secondo dialogo di conferma che chiederà se desiderate davvero procedere con la stampa. Questo fornisce una protezione contro stampe accidentali.
Se desiderate annullare prima della stampa, fate clic su No in questo dialogo; altrimenti, fate clic su Sì per continuare.
5. Dopo la conferma, Excel invierà solo le pagine dispari o pari specificate del foglio di lavoro attivo alla stampante predefinita.
Risoluzione dei problemi e suggerimenti:
- Questa macro funziona sul foglio di lavoro attualmente attivo. Se avete bisogno di stampare più fogli di lavoro, eseguite la macro separatamente per ciascuno.
- Prestare attenzione alle impostazioni della stampante prima di eseguire la macro - assicurarsi che la stampante corretta sia selezionata nella finestra di dialogo Stampa di Excel.
- Se non viene stampato nulla, ricontrollate l'area di stampa e assicuratevi che il vostro foglio di lavoro non sia vuoto o non sia formattato in modo errato per la stampa.
Stampa pagine dispari, pari o specifiche a piacimento con Kutools per Excel
Se avete spesso bisogno di stampare pagine dispari, pari o più pagine specifiche dai vostri fogli di lavoro, Kutools per Excel fornisce una soluzione altamente efficiente. Questo approccio è adatto per gli utenti che desiderano un'interfaccia più intuitiva e facile da usare per gestire lavori di stampa complessi. Con Kutools per Excel, non solo potete scegliere di stampare tutte le pagine dispari o tutte le pari, ma potete anche facilmente specificare intervalli arbitrari personalizzati – qualcosa che non è immediatamente disponibile con le funzionalità native di Excel o semplici macro.
Dopo aver installato gratuitamente Kutools per Excel, potete utilizzare la sua utility Stampa Pagine Specifiche per gestire in modo efficiente le esigenze di stampa versatile:
Per fare ciò, andate su Kutools Plus > Stampa > Stampa Pagine Specifiche. Apparirà la finestra di dialogo Stampa Pagine Specifiche, dove potrete selezionare le opzioni in base alle vostre esigenze di stampa.
![]() | ![]() | ![]() |
All'interno di questa finestra di dialogo, potete:
- Scegliere di stampare tutte le pagine dispari, tutte le pagine pari o specificare un intervallo personalizzato in base alle vostre esigenze, offrendo molta più flessibilità rispetto alle opzioni di stampa predefinite di Excel.
- Visualizzare facilmente in anteprima la vostra selezione per confermare che state stampando le pagine corrette ed evitare sprechi di stampa.
Suggerimento:
1. Per stampare un insieme personalizzato di pagine come 1, 3, 5 e 9 fino a 12, scegliete Intervallo personalizzato e inserite il vostro intervallo nel campo designato (ad esempio, 1, 3, 5, 9-12).
2. Per controllare il numero di copie, basta specificare il conteggio desiderato in Copie impostazione per stampare multipli delle pagine scelte.
3. Se desiderate stampare le pagine in ordine inverso, selezionate l'opzione Stampa in ordine inverso Questa è particolarmente utile per grandi lavori di stampa dove l'organizzazione delle pagine dopo la stampa è una preoccupazione.
Avvertenze e suggerimenti:
- Controllate le interruzioni di pagina e l'area di stampa del vostro foglio di lavoro in anticipo per garantire risultati accurati con le funzionalità di stampa di Kutools.
- Se state stampando intervalli selezionati, notate che righe o colonne nascoste possono ancora essere incluse a seconda delle impostazioni della pagina.
- Usate sempre Anteprima di stampa per confermare l'output prima della stampa finale, specialmente per documenti grandi o critici.
- Questo metodo funziona su un foglio di lavoro alla volta; ripetete se necessario per ulteriori fogli.
Vantaggi: Kutools per Excel è ideale per lavori ricorrenti, utenti che gestiscono report complessi o chiunque voglia minimizzare errori di stampa. La sua interfaccia non richiede conoscenza di codifica ed è molto più flessibile delle soluzioni VBA per scenari di stampa personalizzati.
Soluzione alternativa: Stampa manuale delle pagine dispari o pari tramite la finestra di dialogo Stampa
Se non volete usare VBA o strumenti di terze parti, la stampa manuale delle pagine dispari o pari in Excel può essere effettuata, ma solo un intervallo di pagine alla volta può essere stampato utilizzando la finestra di dialogo Stampa. Excel non supporta l'inserimento di più pagine non contigue (ad esempio, 1,3,5) nella casella Pagine.
Per stampare manualmente le pagine dispari o pari:
- Andate su File > Stampa.
- Nel campo Pagine, inserite un singolo numero di pagina (ad esempio, 1) nella casella “Da” per stampare solo quella pagina specifica.
- Fate clic su Stampa.
- Ripetete questo processo per ogni pagina dispari o pari secondo necessità.
Demo: Stampa pagine dispari, pari o specifiche a piacimento con Kutools per Excel
I 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 oltre300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Clicca qui per ottenere la funzione 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 della stessa finestra, invece che in nuove finestre.
- Aumenta la tua produttività del50% e riduce centinaia di clic del mouse ogni giorno!