Você pode explodir planilhas do Excel em pastas de trabalho separadas usando o VBA (Visual Basic for Applications) no Excel. Aqui está um guia passo a passo:  
 1. Ativar a guia Desenvolvedor:   * Abra sua pasta de trabalho do Excel. 
 * Vá para 
 File> Opções> Personalize Ribbon  . 
 * Verifique a caixa para 
 desenvolvedor  . 
 * Clique em 
 ok  .   
 2. Insira um módulo VBA:   * Clique em 
 desenvolvedor> Visual Basic  . 
 * No Visual Basic Editor (VBE), vá para 
 insert> módulo  .   
 3. Cole e modifique o código VBA:   `` `VBA 
 Sub Splitworksheets ()  
 Dim WB como pasta de trabalho, WS como planilha 
 Dim Newwb como pasta de trabalho 
 Dim FileName como string  
 Set wb =Activeworkbook 'Defina a pasta de trabalho ativa  
 'Faça um loop através de cada planilha 
 Para cada ws em wb.worksheets  
 'Crie uma nova pasta de trabalho 
 Definir newwb =Workbooks.add  
 'Copie a planilha atual para a nova pasta de trabalho 
 ws.copy antes:=newwb.sheets (1)  
 'Renomeie a nova pasta de trabalho com base no nome da planilha 
 nome do arquivo =ws.name &".xlsx" 
 Nome do arquivo newwb.saveas  
 'Feche a nova pasta de trabalho 
 newwb.close 
 Próximo ws  
 Final sub 
 `` `   
 Explicação:   * 
 `Dim WB como pasta de trabalho, ws como planilha, newwb como pasta de trabalho, nome do arquivo como string`: Declara variáveis para armazenar os objetos da pasta de trabalho e a planilha, bem como o nome do arquivo para a nova pasta de trabalho. 
 * 
 `set wb =Activeworkbook`: Define a variável `wb` para a pasta de trabalho atualmente ativa. 
 * 
 `para cada ws em wb.worksheets`: Loops através de cada planilha na pasta de trabalho ativa. 
 * 
 `set newwb =workbooks.add`: Cria uma nova pasta de trabalho em branco. 
 * 
 `ws.copy antes:=newwb.sheets (1)`: Copia a planilha atual (`ws`) para a pasta de trabalho recém -criada (` newwb`), inserindo -a antes da primeira folha. 
 * 
 `filename =ws.name &" .xlsx "`: Define o nome do arquivo para a nova pasta de trabalho usando o nome da planilha e a extensão `.xlsx`. 
 * 
 `newwb.saveas filename`: Salva a nova pasta de trabalho com o nome do arquivo especificado. 
 * 
 `newwb.close`: Fecha a pasta de trabalho recém -criada.   
 4. Execute a macro:   * Pressione 
 alt + f11  para retornar à planilha do Excel. 
 * Vá para 
 desenvolvedor> macros  . 
 * Selecione as folhas 
 splitwork  macro e clique em 
 executar  .  
 A macro criará pastas de trabalho do Excel separadas para cada planilha em sua pasta de trabalho original, salvando -as na mesma pasta que a pasta de trabalho original.   
 Notas adicionais:   * 
 Personalize o formato do nome do arquivo: Você pode modificar a variável `FILENAME` para incluir informações adicionais, como data ou hora, nos nomes de arquivos salvos. 
 * 
 Salvar em uma pasta específica: Você pode especificar uma pasta diferente para salvar as novas pastas de trabalho alterando a variável `FILENAME`. 
 * 
 Execute a macro em uma pasta de trabalho diferente: Antes de executar a macro, selecione a pasta de trabalho que você deseja dividir em arquivos separados.