Como seria a separação? Cada aba do arquivo seria salvo em um arquivo diferente?
Po exemplo, a Plan1 em um arquivo, a Plan2 em outro arquivo, a Plan3 em mais outro... ?????

Sim, Alexandre. É exatamente isso.. No comando que o Mauro Coutinho postou (forum: Separar uma planilha em varias planilhas no mesmo arquivo), o comando já renomeia cada planilha, portanto, se possível, que esse comando mantivesse o mesmo critério.
Obrigado!

A macro abaixo salva com o nome da aba na mesma pasta onde estiver o arquivo que está sendo dividido.

Sub Separa()
    Dim Novo As Workbook
    Dim Aba As Worksheet
    Dim Onde As String

    For Each Aba In ThisWorkbook.Worksheets
        Aba.Copy

        Set Novo = Workbooks(Workbooks.Count)

        Onde = ThisWorkbook.Path
        If Right(Onde, 1) <> "/" Then
            Onde = Onde & ""
        End If

        Novo.SaveAs Onde & Aba.Name, xlWorkbookDefault
        Novo.Close
    Next
End Sub

Alexandre, eu não estou conseguindo colocar essa macro na mesma sequencia das anteriores, para que seja executada por um único botão. Ou é necessário eu criar um outro botão para executar somente esse comando? Colocando esse código em um botão separado, o comando executa corretamente o que eu preciso.
Estou anexando o arquivo (sem o comando que vc enviou), para que possa me ajudar.
Outro detalhe, quando executo o comando, a planilha "geral", que é usada para montar as sub planilhas, também é gerado um arquivo para ela, é possível excluí-la do comando?
Muito obrigado pela ajuda!

Fernando,

Segue o arquivo com modificações...

Alexandre, Perfeito!
Muito obrigado.

Também tinha esta dúvida e dá imenso jeito. Muito Obrigado.

No entanto, seria ainda mais util manter a formatação da planilha. Tenho uma base de dados, toda formatada, com cores, etc. E seria interessante fazer isto mas mantendo toda a formatação da planilha geral.

Será possível?

Já testou??
Ate onde pude ver, o exemplo do colega Alexandre mantem a formatação dos dados filtrados/duplicados

Prezado Miguexcel,

Conforme o Reinaldo afirmou ... Toda a formatação deveria ter sido mantida pois está sendo feita uma cópia da aba ...

Você por um acaso está usando outro Tema que não seja o padrão do excel?
É bem provável que você tenha que trocar o tema nos arquivos separados...

Sim testei...

A formatação está quase toda lá, exceto o tamanho das colunas! Não sei se o mesmo acontece convosco, mas comigo as colunas ficam todas do mesmo tamanho!

Sim, testei o ficheiro. O que acontece é que a formatação acontece, mas as colunas não ficam com o mesmo tamanho.

Galera, tudo bem? Post antigo mas tem ajudado bastante.

Preciso de algo que nao consegui.

Separar e salvar mas ao inves de salver em excel fazer em TXT.

como essa macro ficaria?

Seria de muita valia essa ajuda...

Olá,
Help!!!
Este post é bem antigo, porém o arquivo SepararEmAbas2.zip me serviria perfeitamente, mas quando baixo ele tá vindo com problema. já tentei várias vezes. Alguém poderia me disponibilizar novamente?

Olá,
Help!!!
Este post é bem antigo, porém o arquivo SepararEmAbas2.zip me serviria perfeitamente, mas quando baixo ele tá vindo com problema. já tentei várias vezes. Alguém poderia me disponibilizar novamente?

Gente, já solucionei, obrigado. Em relação ao comentário do Miguexcel, que as colunas ficam do mesmo tamanho, incluí uma linha para ajustar as colunas, conforme abaixo. Vocês podem me confirmar se estou certo ou me corrigir.

Cells.Select
Cells.EntireColumn.AutoFit