OS X Excel 2008: Exportar todas as folhas de documentos para separar arquivos delimitados por tabulações

Question

É possível exportar várias planilhas em um documento do Excel para separar arquivos de texto delimitados por tabulações? Como é, ele exporta apenas a planilha ativa. Eu tenho um documento com 850 folhas, e eu gostaria de ser exportado como delimitado por tabulações.

    

Answer 1

Rápido e simples seria algo assim:

Public Sub ExportSheets(wbk As Workbook, sPath As String)
   Dim sht As Worksheet
   For Each sht In wbk.Worksheets
      sht.Select
      sht.SaveAs sPath & sht.Name & ".txt", XlFileFormat.xlTextMac
   Next sht
   wbk.Close
   MsgBox "Done exporting."
End Sub

No Windows, você chamaria isso digitando ExportSheets ActiveWorkbook, "C:\Data\" na janela imediata.

Observação Estou fechando a pasta de trabalho quando terminar, porque a pasta de trabalho agora é o último arquivo de texto salvo e não a pasta de trabalho original.