Question

我想将csv文件转换为xlsb。我使用了这个Convert XLS to CSV on command line的第二个答案，代码如下：

if WScript.Arguments.Count < 2 Then
    WScript.Echo "Please specify the source and the destination files. Usage: ExcelToCsv <xls/xlsx source file> <csv destination file>"
    Wscript.Quit
End If

csv_format = 6

Set objFSO = CreateObject("Scripting.FileSystemObject")

src_file = objFSO.GetAbsolutePathName(Wscript.Arguments.Item(0))
dest_file = objFSO.GetAbsolutePathName(WScript.Arguments.Item(1))

Dim oExcel
Set oExcel = CreateObject("Excel.Application")

Dim oBook
Set oBook = oExcel.Workbooks.Open(src_file)

oBook.SaveAs dest_file, csv_format

oBook.Close False
oExcel.Quit

我的代码如下：

import subprocess

subprocess.call("cscript CsvToExcel.vbs data.csv data.xlsb",
                stdin=subprocess.PIPE, stdout=subprocess.PIPE, stderr=subprocess.PIPE, shell=False) # Supress any messages

问题在于我无法找到正确的值作为xlsb格式。我发现这个XlFileFormat Enumeration (Excel)有可用的值，但我不确定哪一个是我需要的。

有用的提示：如果有人尝试使用第一行中的第一项转换csv是ID，则会发生错误。将ID更改为id，它会很好，更多信息SYLK: File format is not valid。

Answer 1

根据this，xlsb格式 - xlExcel12，其值为50（Mac在Excel中为51）。此外，您可以使用pywin32库进行转换：

import win32com.client
excel = win32com.client.Dispatch("Excel.Application")
doc = excel.Workbooks.Open('D:\\input.csv')
doc.SaveAs( 'D:\\output_bin.xlsb', 50 )

如何使用Python将csv文件转换为xlsb？

1 个答案: