如何通过批量跳过某些行将Excel文件转换为CSV文件?

时间:2018-10-11 16:01:31

标签: excel csv vbscript

我被要求寻找一种将Excel文件转换为CSV文件的过程,但是我对.bat不了解。我见过有人使用某些命令来执行此操作,我想知道是否可以执行相同但重要的操作:跳过文件的前五行。

如果您能给予我任何帮助,我将不胜感激。

1 个答案:

答案 0 :(得分:-1)

一个非常简单的方法是创建一个vbs脚本。将以下内容粘贴到记事本中,然后另存为XlsToCsv.vbs。确保输入完整的路径sourcexlsFiledestinationcsvfile

要使用:XlsToCsv.vbs [sourcexlsFile].xls [destinationcsvfile].csv

 if WScript.Arguments.Count < 2 Then
    WScript.Echo "Error! Please specify the source path and the destination. Usage: XlsToCsv SourcePath.xls Destination.csv"
    Wscript.Quit
End If
Dim oExcel
Set oExcel = CreateObject("Excel.Application")
Dim oBook
Set oBook = oExcel.Workbooks.Open(Wscript.Arguments.Item(0))
oBook.Sheets(1).Range("1:5").EntireRow.Delete  'this removes the first five rows everytime
oBook.SaveAs WScript.Arguments.Item(1), 6
oBook.Close False
oExcel.Quit
WScript.Echo "Done"