Como imprimir uma planilha sem linhas em branco no Excel?
Ao imprimir uma planilha, as linhas em branco também serão impressas. Alguns usuários do Excel preferem imprimir a planilha sem as linhas em branco para compactar os dados e economizar papel. Mas como imprimir uma planilha sem linhas em branco no Excel? Este artigo oferece dois métodos para você.
Ocultar linhas em branco antes de imprimir com código VBA
Excluir linhas em branco antes de imprimir com o Kutools para Excel
Ocultar linhas em branco antes de imprimir com código VBA
Antes de imprimir a planilha, você pode executar o seguinte código VBA para ocultar as linhas em branco em um intervalo específico. Siga os passos abaixo.
1. Pressione as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.
2. Na janela Microsoft Visual Basic for Applications, clique em Inserir > Módulo. Em seguida, copie e cole o seguinte código VBA na janela Módulo.
Código VBA: Ocultar linhas em branco no intervalo selecionado
Sub HideBlankRows()
Dim xRg As Range
Dim xCell As Range
Dim xAddress As String
Dim xUpdate As Boolean
Dim I As Long
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
Set xRg = Application.Intersect(xRg, ActiveSheet.UsedRange)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "Don't support multiple ranges", , "Kutools for Excel"
Exit Sub
End If
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
For I = 1 To xRg.Rows.Count
xRg.Rows(I).EntireRow.Hidden = (Application.CountA(xRg.Rows(I)) = 0)
Next
Application.ScreenUpdating = xUpdate
End Sub3. Pressione a tecla F5 para executar o código, então uma caixa de diálogo do Kutools para Excel aparecerá. Por favor, selecione o intervalo com as linhas em branco que você não deseja imprimir e clique no botão OK.
Todas as linhas em branco no intervalo selecionado serão ocultadas imediatamente. Depois disso, você pode começar a imprimir a planilha sem as linhas em branco.
Observação: Após a impressão, você pode exibir novamente essas linhas em branco com o seguinte código VBA.
Código VBA: Exibir todas as linhas em branco no intervalo selecionado
Sub UnhideRows()
Dim xRg As Range
Dim xCell As Range
Dim xAddress As String
Dim xUpdate As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select a range to unhide the blank rows", "Kutools for Excel", xAddress, , , , , 8)
Set xRg = Application.Intersect(xRg, ActiveSheet.UsedRange)
If xRg Is Nothing Then Exit Sub
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
xRg.EntireRow.Hidden = False
Application.ScreenUpdating = xUpdate
End SubExcluir linhas em branco antes de imprimir com o Kutools para Excel
Se você deseja imprimir uma planilha sem linhas em branco, recomendamos que você exclua todas as linhas em branco utilizando a ferramenta Excluir Linhas em Branco do Kutools para Excel, e depois poderá imprimir a planilha manualmente.
1. Clique em Kutools > Excluir > Excluir Linhas em Branco > No Intervalo Selecionado/Na Planilha Ativa/Nas Planilhas Selecionadas/Em Todas as Planilhas, dependendo das suas necessidades. Veja a captura de tela:
Observação: Para excluir linhas em branco em um intervalo, selecione primeiro esse intervalo e depois aplique a função.
2. Uma caixa de diálogo aparecerá informando quantas linhas foram excluídas. Clique no botão OK.
Agora, todas as linhas em branco foram excluídas. Você pode começar a imprimir sua planilha.
Observação: Esta utilidade suporta Desfazer Ctrl + Z.
Se você deseja experimentar este utilitário gratuitamente (30 dias), clique para baixá-lo e, em seguida, vá aplicar a operação de acordo com as etapas acima.
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins