Come stampare tutti i fogli tranne un foglio specifico in Excel?
In Excel, la stampa di fogli può essere il lavoro quotidiano generale per te. Tuttavia, hai mai provato a stampare tutti i fogli tranne un foglio specifico? Ad esempio, una cartella di lavoro qui, vuoi stampare tutti i fogli tranne il foglio denominato "Totale", come puoi gestirlo rapidamente?
Stampa tutto il foglio tranne uno con VBA
Stampa alcune pagine di cui hai bisogno con Kutools per Excel
Stampa tutto il foglio tranne uno con VBA
Ecco un codice VBA che può stampare tutti i fogli tranne un foglio specifico.
1. Attivare la cartella di lavoro su cui si desidera stampare i fogli e premere Alt + F11 tasti per aprire il file Microsoft Visual Basic, Applications Edition finestra.
2. Clic inserire > Module, incolla il codice sottostante nello script del modulo.
VBA: foglio di stampa tranne uno
Sub printsheets()
'UpdatebyExtendoffice20161031
Dim xWs As Worksheet
Application.ScreenUpdating = False
For Each xWs In ThisWorkbook.Worksheets
If xWs.Visible = True Then
If xWs.Name <> "Total" Then
With xWs.PageSetup
.PrintArea = "A1:B15" ' USE YOUR PRINTAREA
.Zoom = False
.FitToPagesTall = 1
.FitToPagesWide = 1
End With
xWs.PrintOut
End If
End If
Next xWs
Application.ScreenUpdating = False
MsgBox "Sheet “Total” has not been printed", vbInformation, "Kutools for Excel"
End Sub
Nota: Nel codice, il Totale in Se xWs.Name <> "Total" Then e MsgBox "Il totale del foglio non è stato stampato" è il nome del foglio che non si desidera stampare e A1: B15 in .PrintArea = "A1: B15" è l'intervallo che vuoi stampare di ogni foglio. Puoi cambiarli secondo le tue necessità.
3. Stampa F5 per eseguire il codice, quindi viene visualizzata una finestra di dialogo per ricordare che il foglio specifico non è stato stampato. Vedi screenshot:
4. Clic OK per chiudere la finestra di dialogo.
Stampa alcune pagine di cui hai bisogno con Kutools per Excel
Se desideri stampare solo pagine pari o dispari o pagine specifiche di un foglio, puoi applicare Kutools for Excel'S Stampa pagine specificate utilità che può farti rapidamente un favore.
Dopo l'installazione Kutools per Excel, fai come di seguito :(Scarica gratuitamente Kutools per Excel adesso!)
1. Attivare il foglio in cui si desidera stampare determinate pagine, fare clic su Kutools Plus > Stampa > Stampa pagine specificate. Vedi screenshot:
2. Quindi in Stampa pagine specificate finestra di dialogo, controlla le opzioni in base alle tue esigenze di stampa. Vedi screenshot:
3. Clic Stampa per stampare le pagine.
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- 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, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!