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

Question

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

Answer 1

像这样的东西应该工作：

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")部分）