ReadyState check not working in IE11

josechakkala

New Member
Joined
Nov 23, 2013
Messages
22
I had automated an internal application (IE) in my company using excel macro. In the code i have used readystate property of the document object to determine whether the page is loaded or not. Now when I upgraded my IE to IE11, ready state function is not working. When googled came to know that property is removed from IE1 onwards. Not able to find any alternative for ready state. Requesting your help.

As the application is in my companys intranet, not possible to paste the URL.

Piece of code am referring to is updated below. In that ReqResWindow is the IE Object and DocObjReqRes is a document object.

Set DocObjReqRes = ReqResWindow.Document
Do
DocObjReqResReadyState = DocObjReqRes.ReadyState
Loop Until DocObjReqResReadyState = "complete"
 

Some videos you may like

Excel Facts

Repeat Last Command
Pressing F4 adds dollar signs when editing a formula. When not editing, F4 repeats last command.

puru.sve

Active Member
Joined
Apr 29, 2010
Messages
292
try this if it work .....
Code:
DoRepeatLoop
While DocObjReqResReadyState.Busy
        Application.Wait Now + TimeValue("0:00:1")
        GoTo DoRepeatLoop
    Wend
 

TheEnergyMan

New Member
Joined
Mar 12, 2019
Messages
12
Hi, I have found a solution to this, not sure if others would recommend it but i found that with some pages, when you log into a page, the do until readystate_complete doesn't work. I have used the below and it works perfectly, I hope it helps you and others looking for a solution!



wait1:
On Error Resume Next
If htmldoc.getElementById("myaccountpage:filterForm:searchFilterText").placeholder <> "filter on bill, property, meter & spids" Then
Application.Wait (Now + TimeValue("00:00:01"))
DoEvents
GoTo wait1
End If


to explain, it is looking for a certain element on the loaded page(once you have logged in), and will keep looping until it finds it, it used the 'on error resume next' function to bypass the error it throws up when it can't find the ID, it will only continue when it finds that ID (when the page has loaded)

to explain my dims:

dim IE as internet explorer
dim htmldoc as HTMLDocument
set htmldoc = ie.document


i have used the 'get elementbyID but i'm sure it will work with getelementbyclassname or other get element functions.

the .placeholder refers to text within text box HTML of that ID below:

<input name="myaccountpage:filterForm:searchFilterText" id="myaccountpage:filterForm:searchFilterText" style="width: 40%;" onkeydown="if(event.keyCode==13){return false;}" type="text" <u=""> placeholder="filter on bill, property, meter & spids">

I do hope my explanation helps others with this issue as i couldn't find a solid answer anywhere, I had to come up with this myself!
 
Last edited:

Subscribe on YouTube

Watch MrExcel Video

Forum statistics

Threads
1,106,301
Messages
5,510,495
Members
408,792
Latest member
S_s_s

This Week's Hot Topics

  • Turn fraction around
    Hello I need to turn a fraction around, for example I have 1/3 but I need to present as 3/1
  • TIme Clock record reformatting to ???
    Hello All, I'd like some help formatting this (Tbl-A)(Loaded via Power Query) [ATTACH type="full" width="511px" alt="PQdata.png"]22252[/ATTACH]...
  • TextBox Match
    hi, I am having a few issues with my code below, what I need it to do is when they enter a value in textbox8 (QTY) either 1,2 or 3 the 3 textboxes...
  • Using Large function based on Multiple Criteria
    Hello, I can't seem to get a Large formula to work based on two criteria's. I can easily get a oldest value based one value, but I'm struggling...
  • Can you check my code please
    Hi, Im going round in circles with a Compil Error End With Without With Here is the code [CODE=rich] Private Sub...
  • Combining 2 pivot tables into 1 chart
    Hello everyone, My question sounds simple but I do not know the answer. I have 2 pivot tables and 2 charts that go with this. However I want to...
Top