Como imprimir todas as planilhas, exceto uma específica no Excel?

Ao trabalhar no Excel, imprimir várias planilhas é uma tarefa comum. Mas e se você precisar imprimir todas as planilhas de uma pasta de trabalho, exceto uma específica? Por exemplo, você pode querer imprimir todas as planilhas, exceto a chamada “Total”. Neste guia, mostraremos dois métodos para excluir rapidamente uma planilha da sua impressão.

Imprimir todas as planilhas exceto uma com VBA

Imprima as páginas desejadas com o Kutools para Excel

Imprimir todas as planilhas exceto uma com VBA

Aqui está um código VBA que pode imprimir todas as planilhas, exceto uma específica.

1. Ative a pasta de trabalho da qual deseja imprimir as planilhas e pressione as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo, cole o código abaixo no script do Módulo.

VBA: Imprimir Planilha exceto uma

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

Observação: No código, o Total em If xWs.Name <> "Total" Then e MsgBox "Sheet Total have not been printed" é o nome da planilha que você não deseja imprimir, e A1:B15 em .PrintArea = "A1:B15" é o intervalo que você deseja imprimir em cada planilha. Você pode alterá-los conforme necessário.

3. Pressione F5 para executar o código e, em seguida, uma caixa de diálogo aparecerá para lembrá-lo de que a planilha específica não foi impressa. Veja a captura de tela:

4. Clique em OK para fechar a caixa de diálogo.

Imprima as páginas desejadas com o Kutools para Excel

Se você quiser imprimir apenas páginas pares ou ímpares, ou páginas específicas de uma planilha, pode aplicar o utilitário Imprimir Páginas Específicas do Kutools para Excel, que pode ajudá-lo rapidamente.

1. Ative a planilha na qual deseja imprimir certas páginas, clique em Kutools Plus > Impressão > Imprimir Páginas Específicas. Veja a captura de tela:

2. Em seguida, na caixa de diálogo Imprimir Páginas Específicas marque as opções com base nas suas necessidades de impressão. Veja a captura de tela:

3. Clique em Imprimir para imprimir as páginas.