Como excluir uma planilha específica ao imprimir uma pasta de trabalho?

Se você tem uma pasta de trabalho que contém várias planilhas que precisam ser impressas, mas deseja excluir uma específica, existe algum método rápido e fácil para imprimir todas as planilhas, exceto uma no Excel?

Excluir uma planilha específica ao imprimir uma pasta de trabalho com código VBA

Excluir uma planilha específica ao imprimir uma pasta de trabalho com código VBA

Para imprimir toda a pasta de trabalho, exceto uma planilha específica, o seguinte código VBA pode ajudá-lo.

1. Mantenha pressionadas as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole o seguinte código na Janela do Módulo.

Código VBA: Excluir uma planilha específica ao imprimir uma pasta de trabalho:

Private Sub Printexclude()
'Updateby Extendoffcie
    Dim ws As Worksheet
    Dim strShName As String
    On Error Resume Next
    strShName = Application.InputBox("Enter the sheet name you want to exclude:", _
    "Kutools For Excel", , , , , , 2)
    Application.ScreenUpdating = False
    For Each ws In ThisWorkbook.Worksheets
        If ((ws.Visible = xlSheetVisible) And _
         (ws.Name <> strShName)) Then ws.PrintOut
    Next ws
    Application.ScreenUpdating = True
End Sub

3. Em seguida, pressione a tecla F5 para executar este código, e uma caixa de prompt será exibida para lembrá-lo de inserir o nome da planilha que deseja excluir ao imprimir a pasta de trabalho, veja a captura de tela:

4. Depois clique no botão OK, e as outras planilhas serão impressas imediatamente, excluindo a planilha específica conforme necessário.

Desbloqueie a Magia do Excel com o Kutools AI

• Execução Inteligente: Realize operações de células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
• Fórmulas Personalizadas: Gere fórmulas sob medida para otimizar seus fluxos de trabalho.
• Codificação VBA: Escreva e implemente código VBA sem esforço.
• Interpretação de Fórmulas: Compreenda fórmulas complexas com facilidade.
• Tradução de Texto: Supere barreiras linguísticas dentro de suas planilhas.

Potencialize suas capacidades no Excel com ferramentas alimentadas por IA. Baixe Agora e experimente uma eficiência como nunca antes!