Combinar Consolidar Planilhas com o mesmo nome de vários livros numa só

Fundir dados de várias pastas de trabalho do Excel numa única folha é uma exigência comum em análise de dados, especialmente na preparação de relatórios consolidados ou na agregação de informações provenientes de múltiplas fontes. O desafio torna-se ainda maior quando é necessário consolidar planilhas com o mesmo nome espalhadas por diferentes livros. Este tutorial apresenta-lhe duas abordagens eficazes para simplificar este processo: uma solução com código VBA, ideal para quem prefere um método prático e programável, e outra com o Kutools para Excel, perfeita para utilizadores que procuram uma opção mais intuitiva e automatizada.

• Combinar Consolidar Planilhas com o mesmo nome numa só com código VBA
• Combine facilmente Consolidar Planilhas com o mesmo nome numa só com Kutools para Excel

Combinar Consolidar Planilhas com o mesmo nome numa só com código VBA

Esta secção apresenta um código VBA que combina, numa única folha, todas as folhas de cálculo com o mesmo nome provenientes de vários livros. Siga os passos abaixo:

1. Prima «Alt» + «F11» para abrir o Editor do VBA.
2. No editor do VBA, clique em «Inserir» > «Módulo» e introduza o seguinte código VBA no módulo.
   Código VBA: Mesclar Workbooks com o mesmo nome numa só

   Sub CombineSameNameSheetsFromMultipleWorkbooks()
   'Updated by Extendoffice 2025/3/27
       Dim wsTarget As Worksheet
       Dim wbTarget As Workbook
       Dim wbSource As Workbook
       Dim wsSource As Worksheet
       Dim strSheetName As String
       Dim fd As FileDialog
       Dim FileChosen As Integer
       Dim FileName As String
       Dim lastRow As Long
   
       ' Set the name of the sheets to combine
       strSheetName = "SheetName" ' Change "SheetName" to the name of your sheet
   
       Set wbTarget = Workbooks.Add
       Set wsTarget = wbTarget.Sheets(1)
       wsTarget.Name = "Combined Data"
   
       Set fd = Application.FileDialog(msoFileDialogFilePicker)
       fd.AllowMultiSelect = True
   
       FileChosen = fd.Show
       If FileChosen = -1 Then
           For Each varFile In fd.SelectedItems
               Set wbSource = Workbooks.Open(varFile)
               
               On Error Resume Next
               Set wsSource = wbSource.Sheets(strSheetName)
               On Error GoTo 0
               
               If Not wsSource Is Nothing Then
                   lastRow = wsTarget.Cells(wsTarget.Rows.Count, 1).End(xlUp).Row
                   
                   wsSource.UsedRange.Copy Destination:=wsTarget.Cells(lastRow + 1, 1)
                   
                   Set wsSource = Nothing
               End If
               wbSource.Close False
           Next varFile
       End If
       MsgBox "Data has been combined successfully!", vbInformation
   End Sub

   Nota: Antes de executar o código, terá de alterar «SheetName» na variável «strSheetName» para o nome real das folhas que pretende combinar.

   

3. Prima «F5» para executar o código. Aparecerá a janela «Selecionar os Arquivos do Excel»; selecione os livros que contêm as folhas com o mesmo nome que pretende combinar e, em seguida, clique no botão «Abrir».

   

4. Assim que a fusão estiver concluída, aparecerá uma caixa de diálogo do «Microsoft Excel» a confirmar que as folhas foram combinadas com sucesso. Clique em «OK» para fechá-la.

   

Agora, o conteúdo de todas as folhas de cálculo com o mesmo nome que os livros selecionados foi fundido numa única folha de cálculo num novo livro.

Combine facilmente Consolidar Planilhas com o mesmo nome numa só com Kutools para Excel

Embora o VBA ofereça capacidades poderosas de automação no Excel, pode revelar-se complexo e intimidante para utilizadores sem conhecimentos de programação. Além disso, exige práticas rigorosas de segurança e pode apresentar problemas de compatibilidade. Em contraste, o «Kutools para Excel» proporciona uma alternativa mais amigável e segura, simplificando a combinação de folhas de vários livros — sem necessidade de codificação complexa e tornando esta tarefa acessível a todos os utilizadores do Excel.

Após instalar o Kutools para Excel, selecione «KUTOOLS PLUS» > «Combinar» para abrir o assistente «Consolidar Planilhas». Em seguida, configure conforme indicado a seguir.

1. No assistente «Consolidar Planilhas – Passo 1 de 3», selecione a opção «Mesclar Dados de Várias Pastas de Trabalho com o Mesmo Nome de Planilha» e clique em «Seguinte».

   

2. No assistente «Passo 2 de 3», clique no botão «Adicionar» para selecionar os livros que contêm as folhas com o mesmo nome que pretende combinar.
   Nota: Se os livros estiverem guardados numa pasta, pode clicar na seta suspensa junto ao botão «Adicionar» para expandir o submenu e, em seguida, selecionar «Pasta» para adicionar rapidamente todos os Arquivos do Excel dessa pasta.

   

3. Após adicionar os livros, tem duas opções, consoante as suas necessidades:
   • Se pretender combinar todas as folhas de cálculo dos livros selecionados num único livro, basta clicar no botão «Seguinte». Todas as folhas serão combinadas e o conteúdo das que tiverem o mesmo nome será fundido numa única folha.
   • Se pretender combinar apenas as folhas de cálculo com o mesmo nome, selecione primeiro uma planilha na secção «Lista de Planilhas» e, em seguida, clique no botão «Folha Igual». Esta ação selecionará automaticamente todas as folhas com o mesmo nome nos livros adicionados. Depois, clique em «Seguinte» para continuar.

   

4. No passo final do assistente, mantenha a opção predefinida selecionada ou ajuste as definições de acordo com as suas necessidades e, em seguida, clique em «Concluir».

   

5. Escolha uma pasta de destino para o livro combinado, introduza o nome de ficheiro pretendido e clique em «Guardar» para concluir a operação.

   

Combinar folhas de cálculo com o mesmo nome provenientes de vários livros pode ser feito de forma eficiente com as ferramentas certas. Quer prefira métodos incorporados ou complementos avançados, ambas as abordagens oferecem soluções fiáveis, adaptadas a diferentes níveis de competência. Dominar estas técnicas potenciará significativamente a sua produtividade e simplificará a consolidação de dados no Excel.

Se pretender saber mais sobre esta funcionalidade, consulte esta página: Mesclar Dados de Várias Pastas de Trabalho com o Mesmo Nome de Planilha – tutorial.

Artigos relacionados:

Como combinar vários livros num único livro no Excel?

Como fundir várias folhas ou livros numa única folha?

Como resumir dados de várias folhas ou livros numa única folha?

As Melhores Ferramentas de Produtividade para o Office

🤖	KUTOOLS AI Assistente: Revolucione o Análise de Dados com base em:Execução Inteligente   |  Gerar Código|  Criar fórmulas personalizadas  |  Analisar Dados e Gerar Gráficos|  Invocar Funções Aprimoradas…
	Funcionalidades Populares:Localizar, Destacar ou Marcar Duplicatas   |  Excluir linhas em branco   |  Combinar Colunas ou Células sem Perder Dados   |   Arredondamento sem usar fórmula...
	Super PROC:VLookup com Múltiplos Critérios  |  VLookup com Múltiplos Valores  |   VLookup em Múltiplas Folhas   |   Correspondência Fuzzy....
	Lista Suspensa Avançada:Criar Rapidamente Lista de Seleção   |  Lista de Seleção Dependente   |  Lista de Seleção com Múltipla Escolha....
	Gestor de Colunas:Adicionar um Número Específico de Colunas|Mover Colunas|Alternar Estado de Visibilidade de Colunas Ocultas|Comparar Intervalos e Colunas...
	Funcionalidades em Destaque:Grade de foco   |  Visualização de Design   |Barra de fórmulas aprimorada   | Gestor de Pastas de Trabalho e Folhas   |  Biblioteca de Recursos(Texto Automático)|  Seleção de Data   |  Consolidar Planilhas  |  Encriptar/Descriptografar Células   | Enviar Emails por Lista   |  Super Filtro   |   Filtro Especial(Filtrar Células com Fonte em Negrito/itálico/rasurado...) ...
	Principais Conjuntos de Ferramentas 15:12 Ferramentasde Texto(Adicionar Texto,Excluir Caracteres Específicos, ...)|   50+Tiposde Gráfico(Gráfico de Gantt, ...)|   40+ Fórmulas Práticas(Calcular a idade com base na data de nascimento, ...)|   19 Ferramentasde Inserção(Inserir QR Code,Inserir Imagem a Partir do Caminho, ...)|   12 Ferramentasde Conversão(Converter em Palavras,Conversão de moeda, ...)|   7 Ferramentasde Mesclar e Dividir(Mesclar Linhas Avançado,Dividir Células, ...)|... e muito mais

Utilize o Kutools na sua língua preferida – suporta inglês, espanhol, alemão, francês, chinês e mais 40+ idiomas!

Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...

Mais detalhes sobre Kutools para Excel...Transferência gratuita...

---

Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil

• Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
• Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
• Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!

Mais detalhes sobre Office Tab...Transferência gratuita...

---

Todos os suplementos Kutools — num único instalador.

Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.

• Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
• Um instalador, uma licença— configuração em minutos (pronto para MSI)
• Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
• Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
• Melhor relação qualidade-preço— poupe face à compra individual dos suplementos

Mais detalhes sobre Kutools for Office...Transferência gratuita...