如何使用xlwings保存工作簿?

时间:2014-12-03 21:23:42

标签: python excel vba xlwings

我有一个excel工作表,一些按钮和一些宏。我使用xlwings使它工作。有没有办法通过xlwings保存工作簿?我想在执行操作后提取特定的工作表,但保存的工作表是在没有生成数据的操作之前提取的工作表。

我提取表格所需的代码如下:

Set objFSO = CreateObject("Scripting.FileSystemObject")

src_file = objFSO.GetAbsolutePathName(Wscript.Arguments.Item(0))
sheet_name = Wscript.Arguments.Item(1)
dir_name = Wscript.Arguments.Item(2)
file_name = Wscript.Arguments.Item(3)

Dim objExcel
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = False

Dim objWorkbook
Set objWorkbook = objExcel.Workbooks(src_file)

objWorkbook.Sheets(sheet_name).Copy
objExcel.DisplayAlerts = False

objExcel.ActiveWorkbook.SaveAs dir_name + file_name + ".xlsx", 51
objExcel.ActiveWorkbook.SaveAs dir_name + file_name + ".csv", 6

objWorkbook.Close False
objExcel.Quit

1 个答案:

答案 0 :(得分:8)

Workbook.save()现已作为v0.3.2的一部分实施:请参阅docs

相关问题