VBS脚本自动更新excel文件并导出为csv文件

最新推荐文章于 2023-05-26 06:57:32 发布

jadeball

最新推荐文章于 2023-05-26 06:57:32 发布

阅读量1.6k

点赞数

文章标签： csv excel 脚本

本文链接：https://blog.csdn.net/jadeball/article/details/3826310

版权

该博客介绍了如何使用VBS（Visual Basic for Applications）脚本来自动更新Excel文件，并将更新后的文件导出为CSV格式。通过创建FileSystemObject删除已存在的CSV文件，然后使用Excel.Application对象打开并保存工作簿为CSV格式，最后关闭工作簿和退出Excel应用。文章还提供了关于不同CSV导出类型的相关常量。

摘要由CSDN通过智能技术生成

str = left(wscript.scriptfullname,instrrev(wscript.scriptfullname,"/")-1)

Set fso = CreateObject("Scripting.FileSystemObject")

If fso.FileExists(str+"/1138-data.csv") Then
fso.DeleteFile str+"/1138-data.csv", true
End If

Set fso=NoThing

strXlsFile = str+"/1138-宝银-data.xls"

Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open(strXlsFile)

Call objExcel.ActiveWorkbook.SaveAs(str+"/1138-data.csv",6)

objWorkbook.Close
objExcel.Quit

WScript.quit