Excel VBA控制IE对话框“你想打开还是保存”

我一直在寻找如何按下保存下载文件与IE浏览器,并保存在特定位置的特定名称下的文件。 这是与vba代码一样的屏幕

我的代码看起来像这样到目前为止:

Sub BrowseToSite() Dim IE As New SHDocVw.InternetExplorer Dim HTMLDoc As MSHTML.HTMLDocument Dim HTMLInput As MSHTML.IHTMLElement Dim HTMLButtons As MSHTML.IHTMLElementCollection Dim HTMLButton As MSHTML.IHTMLElement IE.Visible = True IE.navigate "cboe.com/delayedquote/quote-table-download" Do While IE.readyState <> READYSTATE_COMPLETE Loop Set HTMLDoc = IE.document Set HTMLInput = HTMLDoc.getElementById("ContentTop_C005_txtTicker") HTMLInput.Value = "DJX" Set HTMLButtons = HTMLDoc.getElementsByClassName("button blue") HTMLButtons(0).Click End Sub 

我看到的所有其他来源没有为我工作,也许我失去了一些东西。 SendKeys没有工作,我认为这应该是实现按下保存button的最简单的方法。 我应该使用哪些代码?