将CSV数据加载到工作簿中的特定Excel电子表格中

我遇到了将CSV数据加载到当前活动工作簿的问题,但在单独的工作表中。

现在我正在下载临时数据到这个单独的(隐藏的)工作表中,并将在其他工作表中引用它。 电子表格大约是4MB,并且每天更新。

我怎样才能让VBScript加载这个CSV到一个静态命名的工作表,将被加载之前清除?

URLDownloadToFile 0, fileURL, "%tmp%\tmpExchDBData.csv", 0, 0 

Dim dbSheet As Worksheet Dim targetSheet As Worksheet

Workbooks.Open文件名:=“%tmp%\ tmpExchDBData.csv”,_格式:= 2'使用逗号分隔符Set dbSheet = ActiveSheet

将targetSheet = Workbooks(“Book1”)。表单(3)'设置为任意位置

dbSheet.Move之后:= targetSheet'dbSheet现在在您的工作簿中。

' 把它藏起来。 设置dbSheet = ActiveSheet dbSheet.Visible = xlSheetHidden

导入CSV,特别是定期导入相同的CSV文件,可以通过将其定义为数据源来完成。 从“文本”中select要放入的工作表。

一旦定义,在连接属性中有非常有用的选项,如“打开时刷新数据”或“每隔x分钟刷新一次”。