Como salvar, exportar várias / todas as planilhas para separar arquivos csv ou de texto no Excel?
Ao usar o Excel, você pode salvar manualmente uma planilha como um arquivo csv ou de texto usando a função Salvar como. No entanto, para converter várias ou todas as planilhas em uma pasta de trabalho em arquivos csv ou de texto separados, como você pode fazer? Neste artigo, mostraremos métodos para salvar ou converter várias ou todas as planilhas em arquivos csv ou de texto separados.
Salve, exporte ou converta todas as planilhas em csv ou arquivo de texto com código VBA
Salve, exporte ou converta várias/todas as planilhas em csv ou arquivo de texto com o Kutools para Excel
Salve, exporte ou converta todas as planilhas em csv ou arquivo de texto com código VBA
Com os códigos VBA abaixo, você pode salvar todas as planilhas em uma pasta de trabalho em arquivos csv ou de texto separados. Faça o seguinte.
Exportar ou converter todas as planilhas em arquivos csv
1. Pressione outro + F11 simultaneamente para abrir o Aplicativo Microsoft Visual Basic janela.
2. No Aplicativo Microsoft Visual Basic janela, clique em inserção > Módulo. Em seguida, copie e cole o seguinte código no Módulo janela.
Código VBA: exportar todas as planilhas para arquivos csv separados
Sub ExportSheetsToCSV()
Dim xWs As Worksheet
Dim xcsvFile As String
For Each xWs In Application.ActiveWorkbook.Worksheets
xWs.Copy
xcsvFile = CurDir & "\" & xWs.Name & ".csv"
Application.ActiveWorkbook.SaveAs Filename: = xcsvFile, _
FileFormat: = xlCSV, CreateBackup: = False
Application.ActiveWorkbook.Saved = True
Application.ActiveWorkbook.Close
Next
End Sub
3. aperte o F5 chave para executar o código. Você verá que todos os arquivos csv exportados estão localizados no Documentos pasta. Veja a imagem:
Exportar ou converter todas as planilhas em arquivos de texto
O código a seguir pode ajudá-lo a exportar ou converter todas as planilhas na pasta de trabalho em arquivos de texto separados.
Código VBA: exportar todas as planilhas para arquivos de texto separados
Sub ExportSheetsToText()
Dim xWs As Worksheet
Dim xTextFile As String
For Each xWs In Application.ActiveWorkbook.Worksheets
xWs.Copy
xTextFile = CurDir & "\" & xWs.Name & ".txt"
Application.ActiveWorkbook.SaveAs Filename: = xTextFile, FileFormat: = xlText
Application.ActiveWorkbook.Saved = True
Application.ActiveWorkbook.Close
Next
End Sub
Os arquivos de texto exportados também estão localizados no Documentos pasta. Veja a imagem:
Salve, exporte ou converta várias/todas as planilhas em csv ou arquivo de texto com o Kutools para Excel
YVocê pode exportar ou converter rapidamente várias ou todas as planilhas em arquivos csv, arquivos de texto ou formato de arquivos xls individuais no Excel com o Dividir a pasta de trabalho utilidade de Kutools for Excel.
Antes de aplicar Kutools for Excel, Por favor baixe e instale primeiro.
1. Clique Kutools Plus > livro > Dividir a pasta de trabalho. Veja a imagem:
2. No Dividir a pasta de trabalho caixa de diálogo:
- 1). Se você deseja converter todas as planilhas em csv ou arquivos de texto, basta manter todos os nomes das planilhas marcados no Nome da planilha caixa; Se você deseja apenas converter várias planilhas, continue marcando-as e desmarque outras planilhas que não deseja converter.
- 2). No Opções seção, verifique o Salvar como tipo caixa e selecione Texto Unicode (*. Txt) or CSV (Macintosh) (*. Csv) na lista suspensa.
- 3). Clique no Split botão.
3. No Procurar pasta caixa de diálogo, especifique uma pasta para salvar os arquivos exportados e clique no OK botão.
Agora todas as planilhas ou planilhas especificadas são convertidas em arquivos csv ou de texto separados e localizadas na pasta conforme especificado acima.
Se você quiser ter um teste gratuito (30 dias) deste utilitário, por favor clique para fazer o downloade, em seguida, aplique a operação de acordo com as etapas acima.
Salve, exporte ou converta várias/todas as planilhas em csv ou arquivo de texto com o Kutools para Excel
Melhores ferramentas de produtividade de escritório
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...
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!