首页 > 解决方案 > 如何将excel文件转换为CSV并批量跳过一些行?

问题描述

我被要求寻找一种将 Excel 文件转换为 CSV 文件的程序,但是我对 .bat 一无所知。我见过一些人用一些命令这样做,我想知道我是否可以做同样但重要的事情:跳过文件的前五行。

我会很感激你给我的任何帮助。

标签: excelcsvvbscript

解决方案


一个很简单的方法,就是创建一个vbs脚本。将以下内容粘贴到记事本中并另存为XlsToCsv.vbs. 确保你给出完整的sourcexlsFile路径destinationcsvfile

要使用: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"

推荐阅读