' Run Time Error 424 'Object Required Error in excel VBA -


i'am trying run below code in explorer 11. running fine in explorer 9/8 getting error when trying run in explorer 11.

run time error '424' object required

i think there missing unable it. please see below part of code.

sub extract_statusus_test()      dim sheetname     dim internetexplorer     dim onlypatnum     dim ieelement object      onlypatnum = "7989466"     set = new internetexplorer     a.navigate "http://portal.uspto.gov/external/portal/pair"     a.visible = true         loop until a.readystate = readystate_complete     msgbox ("click ok after entering re-captcha")     application.wait + timevalue("00:00:05")         loop until a.readystate = readystate_complete     application.wait + timevalue("00:00:04")     dim inp     if len(onlypatnum) > 7         each inp in a.document.getelementsbytagname("input")             if ucase(inp.title) = ucase("publication number")                 application.wait + timevalue("00:00:01")                 inp.focus                 inp.click                 exit             end if         next inp     else         each inp in a.document.getelementsbytagname("input")             if ucase(inp.title) = ucase("patent number")                 application.wait + timevalue("00:00:01")                 inp.focus                 inp.click                 exit             end if         next inp     end if     application.wait + timevalue("00:00:02")     a.document.getelementbyid("number_id").value = onlypatnum     application.wait + timevalue("00:00:02")     a.document.getelementbyid("submitpair").click     application.wait + timevalue("00:00:02")     until a.readystate = readystate_complete         doevents     loop     application.wait + timevalue("00:00:10")     set ieelement = a.document.getelementbyid("bibview")     msgbox ieelement.innertext  end sub 

i'am getting error in line of code.

a.document.getelementbyid("number_id").value = onlypatnum 

i appreciate if help.


Comments

Popular posts from this blog

Command prompt result in label. Python 2.7 -

javascript - How do I use URL parameters to change link href on page? -

amazon web services - AWS Route53 Trying To Get Site To Resolve To www -