如何在Iframe中出现HTML标签的网站中输入数据?

时间:2017-09-20 16:41:20

标签: excel-vba vba excel

我正在尝试使用vba将数据输入到网页的表格字段中,但我无法访问Iframe Tag中的任何元素。

网站标签:

无法访问此框架内的任何元素。

我尝试使用框架方法访问

Dim elemCollection As IHTMLElementCollection
Set elemCollection = ie.Document.frames("patmainFrame").Document.all

在这里我可以找到Frame但是我无法弄清楚如何访问框架内的HTML元素,我想要选择一个下拉列表并将其插入文本框中。

1 个答案:

答案 0 :(得分:1)

最后找到了一种使用以下声明访问网页框架的方法

Sub test()       
Dim workFrame As HTMLIFrame        
Dim objShell As Object, oWin As Object              
Dim HTMLDoc As HTMLDocument    
Dim ie As InternetExplorer  `enter code here`
Set objShell = CreateObject("Shell.Application")
Set IE_Doc = ie.Document              
Set workFrame = ie.Document.getElementById("XXXXXX")            
Set HTMLDoc = workFrame.contentWindow.Document   
'do something... perform an action   
'.........      
'.........    
End Sub

谢谢。