Ir para o conteúdo principal

Como dividir uma pasta de trabalho para separar arquivos do Excel no Excel?

Pode ser necessário dividir uma pasta de trabalho grande para separar os arquivos do Excel, salvando cada planilha da pasta de trabalho como um arquivo individual do Excel. Por exemplo, você pode dividir uma pasta de trabalho em vários arquivos Excel individuais e, a seguir, entregar cada arquivo a uma pessoa diferente para lidar com ele. Ao fazer isso, você pode fazer com que certas pessoas lidem com dados específicos e os mantenha protegidos. Este artigo apresentará maneiras de dividir uma pasta de trabalho grande para separar arquivos do Excel com base em cada planilha.

  1. Divida uma pasta de trabalho para separar arquivos do Excel copiando e colando
  2. Divida uma pasta de trabalho para separar arquivos do Excel com o recurso Mover ou Copiar
  3. Divida uma pasta de trabalho para separar arquivos do Excel com código VBA
  4. Divida uma pasta de trabalho para separar arquivos Excel / PDF / CSV / TXT facilmente com o Kutools para Excel

Divida uma pasta de trabalho para separar arquivos do Excel copiando e colando

Normalmente, usando Copiar comando e macarrão comando pode salvar uma pasta de trabalho como um arquivo Excel separado manualmente. Em primeiro lugar, selecione toda a planilha que deseja salvar como um arquivo separado, crie uma nova pasta de trabalho e cole-a na nova pasta de trabalho, no final, salve-a.

Esta é uma maneira fácil de usar se você precisar dividir apenas algumas planilhas como arquivos separados. No entanto, deve ser demorado e tedioso dividir muitas planilhas copiando e colando manualmente.


Divida uma pasta de trabalho para separar arquivos do Excel com o recurso Mover ou Copiar

Este método apresentará o recurso Mover ou Copiar para mover ou copiar as planilhas selecionadas para uma nova pasta de trabalho e salvar como uma pasta de trabalho separada. Faça o seguinte:

1. Selecione as folhas na barra da guia Folha, clique com o botão direito e selecione Mover ou Copiar no menu de contexto. Veja a imagem:

Note: Segurando Ctrl , você pode selecionar várias folhas não adjacentes clicando nelas uma a uma na barra da guia Folha; segurando Shift , você pode selecionar várias folhas adjacentes clicando na primeira e na última na barra da guia Folha.

2. Na caixa de diálogo Mover ou Copiar, selecione (livro novo) do Agendar lista suspensa, verifique o Crie uma cópia opção, e clique no botão OK botão. Veja a imagem:

3. Agora, todas as planilhas selecionadas são copiadas para uma nova pasta de trabalho. Clique Envie o > Salvar para salvar a nova pasta de trabalho.

Divida rapidamente uma pasta de trabalho para separar arquivos Excel / PDF / TXT / CSV no Excel

Normalmente podemos dividir uma pasta de trabalho em arquivos Excel individuais com o Mover ou Copiar recurso no Excel. Mas Kutools para Excel Dividir a pasta de trabalho O utilitário pode ajudá-lo a dividir facilmente uma pasta de trabalho e salvar cada planilha como um arquivo PDF / TEXTO / CSV separado ou pasta de trabalho no Excel.


anúncio dividido pasta de trabalho excel

Kutools for Excel - Turbine o Excel com mais de 300 ferramentas essenciais. Desfrute de um teste GRATUITO de 30 dias com todos os recursos, sem necessidade de cartão de crédito! Get It Now

Divida uma pasta de trabalho para separar arquivos do Excel com código VBA

O código VBA a seguir pode ajudá-lo a dividir rapidamente várias planilhas da pasta de trabalho atual em arquivos Excel separados. Faça o seguinte:

1. Crie uma nova pasta para a pasta de trabalho que deseja dividir, porque os arquivos do Excel divididos permanecerão na mesma pasta desta pasta de trabalho mestre.

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

3. Clique inserção > Móduloe cole o código a seguir na janela do módulo.

VBA: divida uma pasta de trabalho em várias pastas de trabalho e salve na mesma pasta

Sub Splitbook()
'Updateby20140612
Dim xPath As String
xPath = Application.ActiveWorkbook.Path
Application.ScreenUpdating = False
Application.DisplayAlerts = False
For Each xWs In ThisWorkbook.Sheets
    xWs.Copy
    Application.ActiveWorkbook.SaveAs Filename:=xPath & "\" & xWs.Name & ".xlsx"
    Application.ActiveWorkbook.Close False
Next
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

4. aperte o F5 chave para executar este código. E a pasta de trabalho é dividida em arquivos do Excel separados na mesma pasta da pasta de trabalho original. Veja a imagem:

Note: Se uma das planilhas tiver o mesmo nome da pasta de trabalho, este VBA não funcionará.

Divida uma pasta de trabalho para separar arquivos Excel / PDF / CSV / TXT facilmente com o Kutools para Excel

Se você tem Kutools for Excel instalado, é Dividir a pasta de trabalho A ferramenta pode dividir várias planilhas como arquivos Excel separados de forma conveniente e rápida com apenas alguns cliques.

Kutools for Excel - Turbine o Excel com mais de 300 ferramentas essenciais. Desfrute de um teste GRATUITO de 30 dias com todos os recursos, sem necessidade de cartão de crédito! Get It Now

1. Depois de instalar Kutools for Excel, clique em Kutools Plus > Dividir a pasta de trabalho , veja a captura de tela:

2. No Dividir a pasta de trabalho caixa de diálogo, faça as seguintes operações:
(1) Todos os nomes de planilhas são verificados por padrão. Se não quiser dividir algumas das planilhas, você pode desmarcá-las;
(2) Verifique o Salvar um tipo opção;
(3) Do Salvar como tipo suspenso, escolha um tipo de arquivo que deseja dividir e salvar.
(4) Em seguida, clique Split botão.

Note: Se quiser evitar a divisão de planilhas ocultas ou em branco, você pode verificar o Pular planilhas ocultas or Pular planilhas em branco caixa.

3. Na caixa de diálogo Procurar pasta, especifique uma pasta de destino para salvar os arquivos separados divididos e clique no botão OK botão.

Agora, as planilhas marcadas são salvas como novas pastas de trabalho separadas. Cada nova pasta de trabalho é nomeada com o nome da planilha original. Veja a imagem:

Kutools for Excel's Dividir a pasta de trabalho ferramenta torna mais fácil dividir a pasta de trabalho ativa em arquivos Excel individuais (um arquivo contém uma planilha), arquivos CSV, arquivos TXT ou arquivos PDF, conforme necessário. Você pode configurar para pular todas as planilhas em branco e ocultas. Faça um teste grátis!


Demonstração: divida ou salve cada planilha de uma pasta de trabalho como arquivos excel / txt / csv / pdf separados


Kutools for Excel: Mais de 300 ferramentas úteis ao seu alcance! Comece hoje mesmo seu teste gratuito de 30 dias sem limitações de recursos. Baixe agora!

Artigos relacionados:

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 (113)
Rated 2.5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
Hello.
Both options work fine. But ..not satisfying my needs.
In each sheet i have 2 extra columns at and which contain vlookup formulas. And they all get exported to new files..
I cant have that.I also cant go and delete all formulas from all sheets then export , too much work.
Any solution to export but to ignore those columns with formulas?
Rated 2.5 out of 5
This comment was minimized by the moderator on the site
I tried this in Office 365 and it copies 8 sheets to separate files then gives me "run-time error '1004': Copy Method of Worksheet Class failed"
This comment was minimized by the moderator on the site
Hi there, did you use the vba code or Kutools?
This comment was minimized by the moderator on the site
I was able to use this macro once and it was great but now it will not work and I only get one file labeled as "Sheet 1" and it is blank, can anyone help?
This comment was minimized by the moderator on the site
Hello, how can we split the sheets tow by tow ==< what i mean is that i have an amount of sheets in one folder and I want tow split each tow successive sheets in one folder, i have tried to put changes on the basic code but i didn't succeed, I'm a beginner in this field if you can be held that is going to be a huge help
This comment was minimized by the moderator on the site
xWs.Copy
showing error in this area
This comment was minimized by the moderator on the site
Hello, I just tried the split data function based on the first column (about 90 partners). Half of the worksheets are named correctly while the other just have number of the sheet eventhough there is name of the partner in the column. Any help, please?
This comment was minimized by the moderator on the site
i have a data of 5 worksheets. Every worksheet has a common column (Branch). Can i convert the data into different excel files based on respective branches
This comment was minimized by the moderator on the site
Hi Sudarshan,
Kutools for Excel has an amazing feature – Split Data, which can quickly split data from a range or a sheet to multiple sheets based on values in the specified column. And these sheets are saved in a new workbook.

You can apply the Split Data feature to split each sheet based on the specified common column.
After splitting, you can apply the Combine Worksheets feature, also provided by Kutools for Excel, and combine all same name worksheets into one workbook.
This comment was minimized by the moderator on the site
excel which i want to split is having 3 spread sheet my requirement is to split the excel as per the sheet 1 and remaning to sheet to be contant when file split
This comment was minimized by the moderator on the site
Hi prateeksha,
In the fourth method on this webpage, the Split Workbook feature of Kutools for Excel is recommended, which will split every specified worksheet to individual PDF/CSV/TEXT/Workbooks.
This comment was minimized by the moderator on the site
Hey there,
I was wondering if we can use this macro to split the workbook into csv files
I've changed the VBA as below, replacing "xlsx" with "csv", but it doesn't work:
Application.ActiveWorkbook.SaveAs Filename:=xPath & "\" & xWs.Name & ".csv"
Thanks for your help!
This comment was minimized by the moderator on the site
Hi Kevin,
It recommends trying the fourth method to solve your problem. Kutools for Excel can be freely trial for 30 days. And the Split Workbook feature of Kutools for Excel can solve the problem easily.
This comment was minimized by the moderator on the site
Very helpful code. Just had one question. How can I make these excel files read-only. I tried the below but it did not work.

Application.ActiveWorkbook.ChangeFileAccess Mode:=xlReadOnly
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations