Vba 自动将数据从Excel工作表保存到CSV文件的代码

是否存在一个代码，例如每小时将sheet1中A1:B10的数据保存到CSV文件？

虽然这可以通过许多不同的方式完成，但我会这样做：

1） 将以下子项添加到新文件中。让我们称之为“auto.xlsb”

如果要避免每10分钟覆盖一次output.csv，可以将当前日期时间添加到文件名中，如下所示：

'Save csv file
newBook.SaveAs Filename:=ThisWorkbook.Path & "\output_" & Replace(Replace(Replace(Now, "/", ""), ":", ""), " ", "") & ".csv"

2） 将此代码添加到auto.xlsb中的工作簿\打开子项（在VBA IDE中单击此工作簿工作表，然后从下拉列表中选择工作簿并打开），然后保存：

Private Sub Workbook_Open()

    Call Module1.SaveRangeToCSV

End Sub

每次双击打开文件时，都会触发SaveRangeToCSV，从而创建csv

3） 自动执行此文件实际上取决于您的首选项和正在使用的操作系统。我假设您的系统在Windows上，所以最简单的方法是在Windows的任务计划程序中创建一个任务，每10分钟运行一次“auto.xlsb”

---

我希望这能有所帮助。

我尝试了许多在互联网上找到的代码，但没有成功。我知道你对我的期望更高，但我对VBA不太满意。我看到了，但这不是基于时间的，请阅读帮助中心的文章。所以这里不是为您做工作，只是为了帮助您解决特定的编程错误。一句话对SO来说不是一个合适的问题。好的，我很抱歉。谢谢你的回答。我会编程，但不会用VBA。我需要雇个人来帮我

Private Sub Workbook_Open()

    Call Module1.SaveRangeToCSV

End Sub