无法单击并导航到某个网站-VBA的下一页

时间:2018-04-13 09:26:29

标签: vba internet-explorer

我想导航并从this网站中选择菜单栏。为了您的信息,我能够获得元素的选定ID,但是没有任何关于如何在单击菜单时使页面成功的线索。我使用IE11和宏来使事情有效。这是我的代码:

Dim IEap As InternetExplorer,htmldoc, el as variant
Set IEap= New InternetExplorer
IEap.navigate("http://fisis.fss.or.kr/fss/fsiview/indexw.html"): IEap.visible= True: DoEvents: Sleep 6000 '''navigate URL
Set htmldoc= IEap.document
For each el in htmldoc.getelementsbytagname("div")
    If ee.ID = "mainframe_ChildFrame0_form_div_submenu00_div_submenu_menu_02_menu02_04TextBoxElement" Then '''want to click "금융통계정보" to navigate next page
    ee.Focus: ee.Click '''im trying this- Failed
    ee.FireEvent ("onclick") ''''this also -Failed
next el

除此之外还有其他特殊方法吗?如果你不介意的话,请你分享一下你的建议吗?因为这是我第一次面对这样复杂的网站。谢谢你的帮助 :) P \ S:避免使用GUI或API方法。 THX

0 个答案:

没有答案