Eva spesso stampa intere cartelle di lavoro contemporaneamente. Quando lo fa, stampa fronte-retro in modo da poter risparmiare carta. Tuttavia, questo a volte significa che la prima pagina di un foglio di lavoro verrà stampata sul retro dell’ultima pagina del foglio di lavoro precedente. Eva si chiede se esiste un modo per assicurarsi che un foglio di lavoro inizi sempre a stampare su un nuovo foglio di carta quando si stampano intere cartelle di lavoro fronte-retro.

C’è un modo manuale per avvicinarsi a questo e un metodo più automatico. Il metodo manuale prevede di capire quale dei tuoi fogli di lavoro richiede un numero dispari di pagine per la stampa e quindi di forzare quel foglio di lavoro a utilizzare un numero pari di pagine. Una volta identificato un foglio di lavoro di questo tipo, tutto ciò che devi fare è andare alla fine di quel foglio di lavoro (appena sotto l’ultima riga) e inserire un’interruzione di pagina. (Visualizzare la scheda Layout di pagina della barra multifunzione e fare clic sullo strumento Interruzioni. È quindi possibile scegliere Inserisci interruzione di pagina.)

Il metodo automatico prevede l’utilizzo di una macro per stampare la cartella di lavoro invece di utilizzare il normale comando Stampa. La macro, in sostanza, stampa ogni foglio di lavoro individualmente, uno dopo l’altro. Pertanto, se si dispone di 5 fogli di lavoro, la macro li stampa come 5 processi di stampa separati.

Ciascuno inizierà nella parte anteriore di una nuova pagina. Ecco la macro:

Public Sub PrintAllSheets()

Dim wks As Worksheet

For Each wks In ActiveWorkbook.Worksheets         wks.PrintOut     Next     Set wks = Nothing End Sub

Questa macro, come affermato, stampa tutti i fogli di lavoro nella cartella di lavoro. Se si desidera stampare un sottoinsieme dei fogli di lavoro, è possibile modificare la macro per stampare solo i fogli di lavoro selezionati quando la macro viene eseguita.

Sub PrintSomePages()

Dim wks As Worksheet

For Each wks In ActiveWindow.SelectedSheets         wks.PrintOut     Next     Set wks = Nothing End Sub

Una (o entrambe) di queste macro potrebbero essere facilmente aggiunte alla barra degli strumenti di accesso rapido in modo da poter stampare esattamente quello che vuoi (tutto o alcuni)

con il semplice clic di un pulsante.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (1984) si applica a Microsoft Excel 2007, 2010, 2013 e 2016.