Ir para o conteúdo principal

Como imprimir várias seleções em uma página no Excel?

Se você tem uma planilha grande que contém muitos dados, e agora deseja imprimir alguns intervalos selecionados que não são contínuos em uma página, para que possa economizar muito papel. O Excel fornece o Definir área de impressão recurso para imprimirmos várias seleções de uma vez, mas, cada intervalo selecionado será impresso em uma página separadamente. Este artigo falará sobre como imprimir várias seleções não contínuas em uma página.

Imprima várias seleções de uma planilha em uma página com o código VBA

Imprima várias seleções de uma ou várias planilhas em uma página com o Kutools para Excel


Imprima várias seleções de uma planilha em uma página com o código VBA

Para imprimir várias seleções não contíguas selecionadas de uma planilha em uma página, o seguinte código VBA pode ajudá-lo, faça o seguinte:

1. pressione Ctrl para selecionar os intervalos que deseja imprimir.

2. Segure o ALT + F11 chaves, e abre o Microsoft Visual Basic para Aplicações janela.

3. Clique inserção > Móduloe cole o seguinte código no Módulo Janela.

Código VBA: imprima várias seleções em uma página

Sub PrintOutRange()
'Updateby Extendoffice
Dim xRng1 As Range
Dim xRng2 As Range
Dim xNewWs As Worksheet
Dim xWs As Worksheet
Dim xIndex As Long
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xWs = ActiveSheet
Set xNewWs = Worksheets.Add
xWs.Select
xIndex = 1
For Each xRng2 In Selection.Areas
    xRng2.Copy
    Set xRng1 = xNewWs.Cells(xIndex, 1)
    xRng1.PasteSpecial xlPasteValues
    xRng1.PasteSpecial xlPasteFormats
    xIndex = xIndex + xRng2.Rows.Count
Next
xNewWs.Columns.AutoFit
xNewWs.PrintOut
xNewWs.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

4. Então aperte F5 para executar este código, e seus intervalos selecionados serão impressos de uma vez, e eles serão impressos em uma única página.


Imprima várias seleções de uma ou várias planilhas em uma página com o Kutools para Excel

O código acima só pode ajudá-lo a imprimir os intervalos selecionados de uma planilha, se você quiser que várias seleções de várias planilhas sejam impressas em uma página, o código acima não funcionará. Não se preocupe, aqui, posso apresentar a você uma ferramenta útil - Kutools for Excel, Com o seu Assistente de seleção múltipla de impressão utilitário, você pode imprimir as seleções de uma planilha ou várias planilhas em uma página de uma vez.

Kutools for Excel : com mais de 300 suplementos úteis do Excel, grátis para testar sem limitação em 30 dias

Depois de instalar Kutools for Excel, siga os seguintes passos:

1. Clique Kutools Plus > Impressão > Assistente de seleção múltipla de impressão, veja a captura de tela:

2. No Assistente de seleção múltipla de impressão, clique embotão adicionar doc botão para selecionar e adicionar o intervalo que você deseja imprimir na caixa de listagem Intervalos para imprimir, um por um, (você pode selecionar os intervalos de uma planilha ou várias planilhas), clique em botão remover doc botão pode remover os intervalos de que você não precisa, consulte a captura de tela:

doc imprimir várias seleções 2

3. Depois de adicionar as seleções na caixa de lista, clique em Próxima >> botão para ir para a etapa 2 do assistente, especificar as configurações de impressão conforme necessário, e você pode adicionar uma linha em branco entre os intervalos selecionados, cheque Adicione uma linha em branco entre os intervalos opção, veja a captura de tela:

doc imprimir várias seleções 3

4. Então continue clicando Próxima >> butoon, na etapa 3 do assistente, especifique a ação para a planilha temporária, você pode ativar a planilha, mas não imprimir, imprimir a planilha e mantê-la ou imprimir a planilha e excluí-la. Veja a imagem:

doc imprimir várias seleções 4

5. Clique Acabamento botão, todos os intervalos selecionados foram colados em uma nova planilha como objetos de imagem vinculados. E você pode arrastar e reorganizá-los na planilha. Veja a imagem:

doc imprimir várias seleções 5

6. Ao imprimir esta nova planilha, os intervalos serão impressos em uma única página conforme necessário.

Clique para saber mais sobre este utilitário Print Multiple Selection Wizard.

Baixe e teste grátis Kutools para Excel agora!


Demonstração: imprima várias seleções de uma ou várias planilhas em uma página com o Kutools para Excel

Kutools for Excel: com mais de 300 suplementos úteis do Excel, grátis para testar sem limitação em 30 dias. Baixe e teste grátis agora!

Melhores ferramentas de produtividade de escritório

🤖 Assistente de IA do Kutools: Revolucionar a análise de dados com base em: Execução Inteligente   |  Gerar Código  |  Crie fórmulas personalizadas  |  Analise dados e gere gráficos  |  Invocar funções do Kutools...
Recursos mais comuns: Encontre, destaque ou identifique duplicatas   |  Excluir linhas em branco   |  Combine colunas ou células sem perder dados   |   Rodada sem Fórmula ...
Super pesquisa: VLookup de múltiplos critérios    VLookup de múltiplos valores  |   VLookup em várias planilhas   |   Pesquisa Difusa ....
Lista suspensa avançada: Crie rapidamente uma lista suspensa   |  Lista suspensa de dependentes   |  Lista suspensa de seleção múltipla ....
Gerenciador de colunas: Adicione um número específico de colunas  |  Mover colunas  |  Alternar status de visibilidade de colunas ocultas  |  Compare intervalos e colunas ...
Recursos em destaque: Foco da Grade   |  Vista de Design   |   Grande Barra de Fórmula    Gerenciador de pastas de trabalho e planilhas   |  Biblioteca (Auto texto)   |  Data Picker   |  Combinar planilhas   |  Criptografar/Descriptografar Células    Enviar e-mails por lista   |  Super Filtro   |   Filtro Especial (filtro negrito/itálico/tachado...) ...
15 principais conjuntos de ferramentas12 Texto Ferramentas (Adicionar texto, Remover Personagens, ...)   |   50+ de cores Tipos (Gráfico de Gantt, ...)   |   Mais de 40 práticos Fórmulas (Calcule a idade com base no aniversário, ...)   |   19 Inclusão Ferramentas (Insira o código QR, Inserir imagem do caminho, ...)   |   12 Conversão Ferramentas (Números para Palavras, Conversão de moedas, ...)   |   7 Unir e dividir Ferramentas (Combinar linhas avançadas, Dividir células, ...)   |   ... e mais

Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo.  Clique aqui para obter o recurso que você mais precisa...

Descrição


Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil

  • Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
how to print selection area with multi print ? i means selection area i wan to print 10 times
This comment was minimized by the moderator on the site
I tried your VBA code with Excel 2016 and I get an error: Compile Error: Sub of Function not defined. This line is highlighted: Set xRng1 = xNewWs.Cells(xIndex, 1)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations