Excel vbamacros – 处理iframes

只要我看到了这个代码应该可以工作:

Sub iFrameInnerHTML() Const cURL = "https://invest.ameritrade.com/grid/p/login?logout=L&promo=3" Set IE = New InternetExplorer IE.Visible = True IE.Navigate cURL Do While IE.READYSTATE <> READYSTATE_COMPLETE Or IE.Busy: DoEvents: Loop Dim iFrm As HTMLIFrame Set iFrm = IE.Document.frames(1).Document.getElementById("noscript-frame") Debug.Print iFrm.Document.body.innerText End Sub 

但是我在“set iFrm = ….”行中遇到错误。

任何帮助,将不胜感激。 阿尔瓦罗·德·莱昂