3
我有一個excel工作表,一些按鈕和一些宏。我使用xlwings來使它工作。有沒有辦法通過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
Workbook.save()應該使它成爲下一個版本... https://github.com/ZoomerAnalytics/xlwings/issues/110 – 2014-12-03 23:43:45