【发布时间】:2017-08-08 07:27:42
【问题描述】:
我有一个 .csv 文件,它会经常生成并使用时间戳命名。我需要在其中运行一个宏并更新 .csv 文件。我使用此解决方案Run Excel Macro from Outside Excel Using VBScript From Command Line 来运行我的宏,但我的问题是我无法保存 .csv 文件,而其中没有启用宏并且更改保存在其中。我只有一张 csv 文件。谢谢您的帮助! 这是我正在使用的代码,(来自该链接):
Dim oFSO
Dim oShell, oExcel, oFile, oSheet
Set oFSO = CreateObject("Scripting.FileSystemObject")
Set oShell = CreateObject("WScript.Shell")
Set oExcel = CreateObject("Excel.Application")
Set wb2 = oExcel.Workbooks.Open("D:\.....\PERSONAL.XLSB") 'Specify foldername here
oExcel.DisplayAlerts = False
For Each oFile In oFSO.GetFolder("D:\..\Output1\").Files
If LCase(oFSO.GetExtensionName(oFile)) = "csv" Then
With oExcel.Workbooks.Open(oFile, 0, True, , , , True, , , , False, , False)
oExcel.Run wb2.Name & "!final1"
End With
End If
Next
【问题讨论】: