Como definir a área de impressão para várias planilhas de uma só vez no Excel?

Em geral, você só pode definir a área de impressão em uma planilha por vez no Excel, mas se quiser definir a mesma área de impressão em várias planilhas em uma pasta de trabalho, há alguma maneira rápida de resolver isso? Agora, vou detalhar alguns métodos rápidos para definir a mesma área de impressão em várias planilhas.

Definir a mesma área de impressão para várias planilhas com o Kutools para Excel

Definir a mesma área de impressão para várias planilhas com VBA

Definir a mesma área de impressão para várias planilhas com o Kutools para Excel

Kutools for Excel é um complemento prático do Excel, e seu recurso Copiar Configuração de Página pode ajudá-lo a definir rapidamente a área de impressão para várias planilhas.

Kutools for Excel inclui mais de 300 ferramentas úteis para o Excel. Gratuito para experimentar sem limitação por 30 dias. Obtenha-o agora

1. Selecione a área de impressão em uma das planilhas e clique em Layout da Página > Área de Impressão > Definir Área de Impressão. Veja a captura de tela:

2. Clique em Kutools Plus > Imprimir > Copiar Configuração de Página.

3. Na caixa de diálogo Copiar Configuração de Página, marque as planilhas nas quais deseja definir a área de impressão ao mesmo tempo, depois clique na aba Planilha e marque apenas a Área de Impressão na seção Configuração de Página. Veja a captura de tela:

4. Em seguida, clique em Ok para fechar a caixa de diálogo e clique em Sim na caixa de diálogo de aviso do Kutools for Excel que aparecerá, e as planilhas marcadas serão configuradas com as mesmas áreas de impressão de uma só vez.

Clique aqui para mais detalhes sobre Copiar Configuração de Página.

Definir a mesma área de impressão para várias planilhas com VBA

Se você se interessa por VBA, pode tentar o seguinte código VBA.

1. Selecione um intervalo que deseja definir como área de impressão em uma das planilhas e pressione Alt + F11 para abrir a janela Microsoft Visual Basic For Applications.

2. Clique em Módulo > Inserir para inserir uma janela Módulo e copie o VBA abaixo para a janela.

VBA: Definir área de impressão em toda a pasta de trabalho.

Sub SetGlobalPrintArea()
'Updateby20140827
Dim xWs As Worksheet
Dim WorkRng As Range
Set WorkRng = Application.Selection
For Each xWs In Application.ActiveWorkbook.Worksheets
    xWs.PageSetup.PrintArea = WorkRng.Address
Next
End Sub

3. Clique no botão Executar para executar o VBA, e todas as planilhas na pasta de trabalho serão configuradas com as mesmas áreas de impressão.

Dica:

Se você quiser definir a área de impressão em planilhas selecionadas, pode fazer o seguinte:

1. Selecione um intervalo que deseja definir como área de impressão e selecione as planilhas mantendo pressionada a tecla Ctrl nas planilhas desejadas, depois pressione Alt + F11 para abrir a janela Microsoft Visual Basic For Applications.

2. Clique em Módulo > Inserir para inserir uma janela Módulo e copie o VBA abaixo para a janela.

VBA: Definir área de impressão em planilhas selecionadas.

Sub SetSelectWsPrintArea()
'Updateby20140827
Dim xWs As Worksheet
Dim WorkRng As Range
Set WorkRng = Application.Selection
For Each xWs In Application.ActiveWindow.SelectedSheets
    xWs.PageSetup.PrintArea = WorkRng.Address
Next
End Sub