Opção 1:usando a macro VBA

1. Abra o arquivo Excel que deseja dividir.
2. Pressione Alt+F11 para abrir o Editor do Visual Basic.
3. No Explorador de Projetos , clique com o botão direito em ThisWorkbook módulo e selecione Inserir> Módulo .
4. Copie o seguinte código no módulo:

```
SubdividirRows()
Dim ws como planilha
Dim i As Long, j As Long
Dim nome do arquivo como String
Diminuir célula como intervalo

Para cada ws em ThisWorkbook.Worksheets
i =2 'Começa na segunda linha (cabeçalho)
j =1 'Contador para os novos arquivos
nome do arquivo =ws.Nome &"_" &j
Pastas de trabalho.Add.Worksheets(1).Nome =ws.Nome

While Cells(i, 1) <> "" 'Loop até a última célula não vazia
Linhas (i). Destino da cópia:=Pastas de trabalho (nome do arquivo). Planilhas (1). Linhas (j)
Se eu Mod 1000 =0 Então
ActiveWorkbook.SaveAs Nome do arquivo:=nome do arquivo, FileFormat:=xlWorkbookDefault, CreateBackup:=False
Application.DisplayAlerts =Falso
ActiveWorkbook.Fechar
Debug.Print "Dividindo" &ws.Name &"em" &nome do arquivo
j =j + 1
Pastas de trabalho.Add.Worksheets(1).Nome =ws.Nome
nome do arquivo =ws.Nome &"_" &j
Terminar se
eu =eu + 1
Wend

ActiveWorkbook.SaveAs Nome do arquivo:=nome do arquivo, FileFormat:=xlWorkbookDefault, CreateBackup:=False
Application.DisplayAlerts =Falso
ActiveWorkbook.Fechar
Debug.Print "Divisão concluída" &ws.Name &"em arquivos" &j &""

Próximo foi

Debug.Print "Todas as planilhas foram divididas com sucesso"
Application.DisplayAlerts =Verdadeiro

Finalizar sub
```

5. Feche o Editor do Visual Basic e retorne ao arquivo Excel.
6. Clique em Desenvolvedor guia e clique em Macros botão.
7. Na Macro caixa de diálogo, selecione SplitRows macro e clique em Executar botão.

Opção 2:usar texto em colunas

1. Abra o arquivo Excel que deseja dividir.
2. Selecione as células que deseja dividir em arquivos separados.
3. Vá para Dados e clique em Texto para Colunas botão.
4. Em Texto para Colunas assistente, selecione a opção Delimitado opção e clique em Avançar .
5. Nos Delimitadores seção, selecione a Vírgula caixa de seleção e clique em Avançar .
6. Na Visualização de dados seção, verifique se os dados estão divididos corretamente e clique em Concluir .
7. Os dados selecionados serão divididos em colunas separadas.
8. Salve cada coluna como um arquivo separado acessando Arquivo guia, clicando em Salvar como e escolhendo a Pasta de trabalho do Excel formato de arquivo.