OS X Excel 2008:将所有文档表导出到单独的制表符分隔文件

OS X Excel 2008:将所有文档表导出到单独的制表符分隔文件

是否可以将 Excel 文档中的多个工作表批量导出到单独的制表符分隔文本文件?实际上,它只导出活动工作表。我有一个包含 850 个工作表的文档,我希望将它们全部导出为制表符分隔文件。

答案1

快速而简单的做法是这样的:

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

在 Windows 上,您可以通过ExportSheets ActiveWorkbook, "C:\Data\"在即时窗口中输入来调用它。

注意:完成后我将关闭工作簿,因为该工作簿现在是最后保存的文本文件,而不是原始工作簿。

相关内容