早上好,这是我的第一个问题,希望您能对我有所帮助。
我已经创建了文件的URL,并且可以进行查询以返回该CSV文件并将其另存为Excel文件(.xls)。这很好。我的问题是我下载了多个文件,并且希望将它们全部都保存到同一个Excel文件中,这样就可以正确地知道我保存了所有这些文件,然后将它们复制到一个通用的Excel文件中...每个下载文件的代码:
XMLPage.Open "Get", URL, False
XMLPage.send
FileData = XMLPage.responseBody
Set XMLPage = Nothing
'Save the file
FileNum = FreeFile
Open carpeta For Binary Access Write As #FileNum
Put #FileNum, 1, FileData
Close #FileNum
我在“ URL”中有我的文件的URL,在“ carpeta”中有我要保存的文件路径。如我所说,这可行,但是如果我运行:
Debug.print XMLPage.responsetext
我已经可以看到所需的信息,以“;”分隔(CSV格式)。我的问题是我无法将此XMLPage.responsetext复制到我的工作簿的工作表中(即使它看起来比以前的步骤更容易...)。
我为您提供XMLPage.responsetext的示例:
"text1";"text2";"text3";"text4"
"text5";"text6";"text7";"text8"
因此,除了保存所有这些文件外,我只想将此XMLPage.responsetext放在我的Excel工作表中。
先谢谢了。 :)