【发布时间】:2021-01-05 12:19:46
【问题描述】:
使用从网络下载excel文件的链接“https://~”,尝试了以下代码。
Workbooks.Open("https://~")
只需在任何网络浏览器中复制并粘贴 url 链接即可正常工作 - 下载所有内容不变的 excel 文件。
但是,通过上面的 vba 链接,一个 excel 文件以 [只读] 格式打开并且完全空白,即使在 excel 中没有垂直和水平线。
我该如何解决这个问题?
【问题讨论】:
使用从网络下载excel文件的链接“https://~”,尝试了以下代码。
Workbooks.Open("https://~")
只需在任何网络浏览器中复制并粘贴 url 链接即可正常工作 - 下载所有内容不变的 excel 文件。
但是,通过上面的 vba 链接,一个 excel 文件以 [只读] 格式打开并且完全空白,即使在 excel 中没有垂直和水平线。
我该如何解决这个问题?
【问题讨论】:
这可能是因为您的文件没有存储在您的电脑中(仅作为临时文件)。
从网页打开文件后需要SaveAs。
Sub SaveFile()
Dim wb As Workbook
Set wb = Workbooks.Open("https://yoururl.com/yourfile.xls")
wb.SaveAs ("C:\yourPath\SavedFile.xls", FileFormat:=56)
End Sub
【讨论】:
Sub test() ~ End Sub