如何让Excel以编程方式写入CSV?

目前我的电子表格读取财务数据。 我想以编程方式将其每秒转换为CSV。 我如何在VBA中做到这一点?

像这样的东西应该工作:

Sub SetTimeout() Application.OnTime Now + TimeValue("00:00:30"), "SaveAsCSV" End Sub Sub SaveAsCSV() Calculate ActiveWorkbook.SaveAs Filename:="book1.csv", FileFormat:=xlCSV, CreateBackup:=False Call SetTimeout End Sub 

只要调用SetTimeout()只要你想开始保存,它会从那时起每隔30秒(因此Now + TimeValue("00:00:30")部分)