html - 每周从网页中检索/下载数据和图表

Question

我正在尝试使用 vba 在 Excel 中创建仪表板，以自动从网页检索/下载数据和图形。这些图表和数据每天或每周都会更新。所以我希望仪表板每周更新一次。一个例子是这个图：http ://cdec.water.ca.gov/reportapp/javareports?name=PLOT_ESI.pdf

我在网上找到了一些示例，但找不到任何 pdf 格式的图表示例。任何建议将不胜感激。

Sub Get_Web_PDF()
 Dim request As Object
 Dim response As String
 Dim html As New HTMLDocument
 Dim website As String
 Dim graph As Variant

website = "http://cdec.water.ca.gov/reportapp/javareports?name=PLOT_ESI.pdf"
Set request = CreateObject("MSXML2.XMLHTTP")
request.Open "GET", website, False
request.setRequestHeader " If-Modified-Since", "Sat, 1 Jan 2000 00:00:00 GMT"
request.send
response = StrConv(request.responseBody, vbUnicode)
html.body.innerHTML = response
graph = html.getElementsByClassName("html/body/div[2]/embed").Item(0).innerText
End Sub

标签： htmlexcelvbapdfautomation