将.xls转换为.csv

我需要将Excel电子表格转换为CSV文件。 我想自主地做，而不是打开它，并保存为手动。 正如我试图把这个到一个batch file，我也不想安装任何东西。 我正在使用Excel 2007。

我已经搜遍整个网站和其他人，但一直没有拿出一个完整的解决scheme。 我发现这个vbs代码在另一个问题上，所以谢谢谁让我开始。

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 

我遇到的问题是在oExcel.WorkBooks.Open（src_file）。 我不断得到错误，它是“无法获得工作簿的打开属性”错误代码800A03EC。

对这个错误的研究会导致人们在他们的服务器上出现代码问题，而且人们所提出的修复方法是行不通的。 这不是在服务器上，我试图在本地文件上运行它的客户端。 我尝试了一个不同的Excel文件的脚本，它完美的作品。 与这个差异似乎是，当我打开它，我从Office文件validation得到安全警报。

那么有关如何通过脚本打开时跳过Office文件validation警告的任何想法？